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Introduction 


Modern mathematics is a many-faceted subject required in a wide range of 
studies and careers. Analyzing and testing data, investigating relationships, 
and applying mathematical models to real-life situations — these are skills 
that are essential to many disciplines, and they can offer you exciting and 
stimulating insights into the way the world operates. But certain parts of 
mathematics — compiling data, checking and rechecking calculations and 
performances, the “arithmetic’’ part of mathematics — can be quite tedious. 
You’ve probably looked for ways to increase the speed and accuracy of 
calculations like these. 


CALCULATOR EVOLUTION 


You are not alone. Throughout the centuries mankind has searched for tools 
to help perform the arithmetic side of mathematics more easily and quickly. 
Your programmable calculator is another link in what has been and will 
continue to be an explosive evolution in the development of better, faster, 
and more accurate computational tools. 


Historians usually consider the abacus, which originated in the Orient as 
early as the 6th century B.C., to be the first real calculating device. The 
abacus has existed in various forms in many cultures and is still in use in 
some areas today. For many centuries there was little improvement in these 
basic tools, but by the 1 7th century the evolution had begun. 


The invention of the first actual calculating machine is credited to the 
French scientist-philosopher Blaise Pascal in 1642, although work along these 
lines had been done by earlier inventors and innovators. By 1671 Gottfried 
Leibniz had developed his more advanced machine, the “Stepped 

Reckoner,” which could add, multiply, divide, and extract square roots. 
Early attempts to manufacture calculators, however, produced highly 
unreliable results. It was not until 1820 that the first commercial machines 
handling addition, subtraction, multiplication, and division became available. 


Another advanced idea occurred during the 1800's. Punched-card automation 
systems were invented to drive mills and looms, like the one invented by 
Joseph Marie Jacquard. An Englishman, Charles Babbage, saw the 
possibilities of data storage on punched cards for a calculating device. He 
proposed building an “Analytical Engine” that would store both numbers 
and the operations to be performed with them, use the results of one 
calculation as input data for another, and perform repetitive computations 
(loops) and conditional transfers. Although Babbage was never able to 
complete a working prototype, his designs stand as a milestone in the 
evolution of today’s programmable calculators and computers. As he 
predicted, it was a half-century after his death in 1871 before his visionary 
goals were accomplished. 
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CALCULATOR EVOLUTION 


Until the late 19th century all computing devices were operated 
mechanically by gears, ratchets, springs, cranks, and levers. Herman 
Hollerith was the first to add an electric card reader to data processing. His 
system was used to tabulate the 1890 U.S. census, and in 1896 he entered the 
commercial market. His company was called the Tabulating Machine 
Company; in 1924, after several mergers, it became the International 
Business Machine Corporation. 


Electromechanical calculators held the field from 1925 until the middle 
1940's, culminating in the Mark I computer completed by Harvard 
University in 1944. Even before it was finished, however, work had started on 
the first electronic computer, the ENIAC. 


The rapidly growing electronic computer technology quickly outstripped the 
performance of electromechanical and electrical calculating devices. The 
ENIAC was more than 1,000 times faster than its electromechanical 
counterparts. Its vast array of circuitry and vacuum tubes was contained in 
thirty units, requiring a space of 30 by 50 feet and weighing more than 30 
tons. Clearly, ways had to be found to reduce the size, complexity, and cost 
of computers. 


During the 1950's, computer technology searched for new refinements and 
advances toward this goal. Transistors, which replaced the vacuum tube, 
greatly reduced the size and cost of computers and increased their reliability. 
But an even more exciting breakthrough came in 1958 through the work of 
Jack Kilby at Texas Instruments. That breakthrough was the integrated 
circuit. 


The integrated circuit or “IC” is a tiny “chip” of silicon with complete 
electronic circuits, including thousands of transistors, diodes, capacitors, 
resistors, and their required interconnections, built into it by a series of 
techniques resembling photographic development. Today’s sophisticated IC’s 
can perform calculations that required a room-sized computer 25 years ago. 
Along with companion developments in various display technologies, these 
tiny devices have been a key factor in making handheld calculators a 
practical and affordable reality. 
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CALCULATOR ROLES IN TopaAy’s COLLEGE STUDIES 


So welcome to a new era — the era of “calculator analysis.” Modern 
technology has placed a new dimension in instant problem-solving capability 
in your hands. The power and versatility of calculators such as the TI 
Programmable 58 and TI Programmable 59 offer you not only easy and 
accurate computation, but also another important commodity: more time. 
Time to explore relationships in data. Time to try out mathematical models 
that were previously too complex and time-consuming to approach in the 
classroom. Time to look at more of the “what-ifs” in any problem-solving 
situation. 


Modern education is beginning to feel the impact of calculators in the 
classroom. From teaching and reinforcement of basic math concepts in the 
primary grades to advanced graduate-level research, these compact, 
powerful machines can help to make the job easier for students and teachers 
alike. Chances are that you have already owned at least one handheld 
calculator that performed basic arithmetic and allowed you to concentrate 
more on the analytical side of mathematics. Now, your programmable 
calculator can open whole new avenues of enjoyment and creativity for you. 
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PROGRAMMABILITY 


Programmability greatly expands the power and usefulness of your 
calculator. Routines that previously could be attempted only on a computer 
can now be performed right at your fingertips. Iterative calculations that 
used to require hours will essentially take little more time than is needed to 
enter your program into the program memory. 


You won't need to go through a lengthy training period or learn super- 
sophisticated skills in order to use the programmable capabilities of your 
calculator. Basically, you simply tell the calculator what you want it to do 

and the order in which the operations are to be done. Chapter Four of 

Personal Programming, the owner's manual for the TI Programmable 58/59, 
takes you step by step through the basics of programming your calculator, 

and you'll soon become comfortable with these techniques, based largely on 
common sense and logical thinking. The small amount of time you'll spend 
mastering the use of your calculator can yield enormous and continuous returns. 


SoME SPECIFICS 


Included here are some of the guidelines that were followed in preparing the 
programs in this book. For the most part, the programs are written in “bite- 
size”” segments (subroutines), with each segment performing a specific 
function within the program. Think of these subroutines as modules or 
“building blocks” you can use to develop new programs. It’s a good idea for 
you to write your own programs in segments, also, so that you can draw on 
these to expand your personal library of programs easily. 


You'll notice several other general rules of programming used throughout this 
book. For example, wherever possible the user-defined keys [A] through 

MH have been used as labels (rather than what are called the “common 
labels” — (#2) , [nz] | etc.) because they are more easily identifiable within a 
program and they can be quickly and simply accessed from the keyboard. 
Remember, however, that you have many more labels to call on when you 
need them. 


Another general rule followed here is the use of short-term addressing within 
programs; that is, the use of a one-digit register address to access data 
registers 0-9. This practice can save quite a few keystrokes when a program 
calls for a lot of memory accessing. Keep in mind, however, that short-form 
addressing can be used only when a non-numeric keystroke immediately 
follows the register address. 
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SOME SPECIFICS 


Generally speaking, absolute addressing and indirect addressing have been 
avoided, to keep the programs as straightforward as possible. You will find a 
few examples of absolute addressing in programs that would require a very 
long performance time without it. Indirect storage and recall have been used 
occasionally when it was necessary to access memory registers sequentially 
within a program. 


Print commands are written into the programs so that results will 
automatically be printed if the PC-100A thermal printer is used. If you are 
using the calculator alone, these commands are ignored by the calculator as a 
program is run. (You may choose to omit them entirely when keying in the 
program.) 


For more information on these techniques, refer to these pages in Personal 
Programming: 


Subroutines — pp. 1V-46ff, V-58ff. 

Labels — pp. IV-11, IV-43, V-55, and V-56. 

Short-form addressing — IV-15, [V-44, V-22, and V-58. 
Absolute addressing — IV-44, IV-86, V-57. 

Indirect addressing — IV-84, IV-86, V-68. 

Printer Control] — Chapter VI. 


None of the programs in this book should be considered as the “last word” on 
how a particular problem is to be solved. These samples are merely intended 
to show you one way — among many — to approach a solution. You'll soon 
find yourself developing your own programming methods. 


You may also be interested in seeing how other calculator owners have 
approached situations similar to yours, PPX-59 (Professional Program 
Exchange) offers a wide selection of programs written by owners and users of 
the TI Programmable 59. Annual membership dues at the time of this 
printing are $15.00. For information, write to: 
Texas Instruments Incorporated 
PPX-59 
P.O. Box 53 
Lubbock, Texas 79408 
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How to Use Tus Boox 


This book is designed to guide you into the application of calculator analysis 
either as part of your studies or in your work. Of course, it does not attempt 
an exhaustive or totally comprehensive review of all the uses of a 
programmable calculator in every discipline. Instead, we hope that the 
examples included here will stimulate and challenge you to create your own 
programs and to find new ways to use your calculator in your classes and 
career. 


Several of the topics covered here are common to many disciplines. Since 
basic number theory, college algebra and trigonometry, calculus, and 
statistics are required in many degree programs, these chapters are grouped 
at the beginning of the book. The remaining chapters offer sample 
applications in music, business, economics, biology, biomedical engineering, 
electrical engineering, and physics and astronomy. 


Each chapter contains a special selection of example situations, along with a 
brief look at the theory and background necessary to lead you to a program 
solution. A sample solution is included in each case, and related examples are 
outlined for you to explore on your own. 


For convenience, the material in this book is cross-referenced to Personal 
Programming and the Master Library manual wherever necessary. 
Remember, too, to consult the index in the back of the book for programs 
that can be of use to you. 
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Notes Asout YouR CALCULATOR 


With minor exceptions the programs in this book have been designed for 
both the TI Programmable 58 and TI Programmable 59. A few programs 
have too many steps to be entered in entirety into the TI Programmable 58. 
In most of these, however, the major subroutines can still be used, with 
intermediate calculations performed directly from the keyboard. 


The major differences in the two calculators lie in the maximum number of 
data and program storage registers available and the magnetic card reading 
and writing capability of the TI Programmable 59. The differences are 
summarized in the following chart. 


TI Programmable 58 TI Programmable 59 


Partitioning when first 
turned on 30—memory registers— 60 
240 — program steps — 480 
Maximum data storage 
registers (memories) 60 (0 program steps) 100 (160 program steps) 
Maximum program steps 480 (0 memories) 960 (20 memories) 
Magnetic card reading 
and writing no yes 


/ 


For a full discussion of partitioning, see pages V-22, V-29, and V-42 in 
Personal Programming. 
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Key ARRANGEMENT DIAGRAMS 


The keys of the TI Programmable 58 and 59 are conveniently grouped 
according to their function. The following diagrams review the key 
arrangement and are cross-referenced by chapter and/or page number to the 
sections in Personal Programming that discuss the functions of the keys. 


Data Entry, Basic Operation, 
and Algebraic Function Keys: 
Chapters II, V 


Special Operation Keys 


Clearing Keys: 
11-2, IL-6 


Display 
Format Keys: 
11-8, 11-9 


Conversion Keys: 
I-13, 1-14 


INTRODUCTION 


Key ARRANGEMENT DIAGRAMS 


Memory and Statistics Keys 


Statistics Keys: 4 


Memory Keys: 
V-32 — V-40 


II-6, 11-7 


Programming Keys: 
Chapters IV, V, VI, VII 


BNE) bP 


[ss] 


*The TI Programmable 58™ does not have this function. 
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Introduction 


The properties of the integers have fascinated people for centuries. The study 
of numbers can be traced back as early as 1600 B.C., when the Babylonian 
mathematicians computed various numerical properties out of a desire to 
understand the magnitude of numbers. Then, beginning about 300 B.C., the 
Greeks developed the foundations for a systematic study of numbers based 

on axioms and supported by logical proofs. The axiomatic approach to 
number theory has continued through the centuries, and even today this 
fascination with numbers occupies a major place in mathematical research. 


It is interesting to note, however, that the computational aspect of number 
theory, rather than pure research, has been the driving force in the 
development of the subject. One does not need to understand a large amount 
of mathematical theory to investigate the properties of numbers. In fact, 
many properties of number systems were first formulated by actually 
computing the results for various sets of numbers. Modern high-speed 
computers have provided the computing power to justify many conjectures 
and have even in some cases actually assisted in proving number theory 
properties, 


Your programmable calculator and the computational techniques presented 
in this chapter can help you examine the properties of numbers and develop 
new insights into fundamental number theory. The algorithms (repetitive 
computational procedures) used in the programs and the theoretical 
discussions which accompany the programs could pose some new questions, 
for which the calculator may serve as an effective sounding-board. No 
sophisticated mathematical knowledge is required to understand the material 
included in this chapter, and we hope that it will encourage you to explore 
the properties of numbers even further on your own. 
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OBJECTIVE 


Facts/ 
THEORY 


Sequences and Series 


Sequences and series are important mathematical concepts which weave 
themselves through calculus, probability, statistics, finance, and many other 
mathematical endeavors. The following program can help you to analyze and 
evaluate various sequences by finding the nth term and the sum of the first n 
terms of an arithmetic or geometric progression, 


Generally a sequence is a set of numbers that are in a one-to-one 
correspondence with the set of positive integers n. The sequence may be 
finite or infinite. The numbers or members of the set are called terms. 


A series is closely related. A simple way to think of a series is to describe it as 
a sequence with the symbol + between each term. For example, 2, 4, 6, 8, 
10, ... is an infinite sequence, while 2+4+6+8+ 10+ ... is an infinite series. 


An arithmetic progression is a sequence in which each term of the sequence 
is the sum of the preceding term and a constant. For example, 2, 4, 6,8... 
is an arithmetic progression where the fixed constant is 2. 


You can easily find the sum of the first n terms of an arithmetic progression 
(S,) by evaluating the formula 


S, =n/2[2a+ (n—I)k] 


where a is the first term and k is the constant. To find the nth term of the 
progression (t,), you evaluate the formula 


t, =a+(n—1)k 


A geometric progression is a sequence in which each term is the product of 
the preceding term and a constant multiplier (common ratio). For example: 
4, 2,1, %, ... is a geometric progression where the common ratio is 2. For a 
geometric progression, the sum of the first n terms (S,) is 


Ss a—ar*’ 
: l-r 
where a is the first term and r is the common ratio. You can find the nth term 
of the progression (t,) by evaluating 


t, =ar™! 


The following program finds S,, and t, for arithmetic and geometric 
progressions and helps you explore aspects such as convergence. Note that the 
program checks the value of r to see if it is negative or positive, since it is 
raised to a power in the geometric progression formulas. A negative value 
raised to a power with the key causes a flashing display; therefore the 
program performs an odd/even test on the exponent (if r<() and assigns 

the proper sign to the value of r® or r""’. 
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SEQUENCES AND SERIES 


PROGRAM 


Program Keystrokes Purpose/Comments 


OFF/ON Clears calculator and 
enters learn mode. 


iE (4) 1 Stores a in memory 1. 


005 L tb) | 2 Stores r (or k) in memory 2 and 
x=!) EE) sets flag 1 if r is negative. If r is 
St ie 0 or positive, program trans- 


fers to BGM and stops. 


Lot | 3 Stores n in memory 3. 


Ltt | Me inv) If n is positive, the [Nv] 
l 1 insures that flag 1 
is not set. 


019 


1 (0) l Eel Calculates t, for an arithmetic 
3)... [RC] 2 progression. 

=e) | Pit | 

WH CE) 3E) 2 Calculates S, for an arithmetic 
1 2 [RCt] ] a progression. 

H jel ceil fe | fre] 2 (=) 

| Pit 

Lb | ™ Calculates t, for a geometric 
2 (Re 1 [Rel] 2 progression (a X |r|®"' stored 
zc | CC) Re) 3 (©) in memory 6). If r is negative, 
10) So) 4 Ee) 6 program transfers to HG. 

fi | [| 


Note: Flag 2 is set for later 
branching purposes. 


HG inv) Calculates S, for a geometric 
BEA 2 [rc] 2 Iz! | progression (|r|® stored in 

3 4) memory 6). If r is negative, 

6 Wa | program transfers to HG. 
Lc MON (=?) 

6 x) 1 (=) Note: Flag 2 is unset for later 
1) Se branching purposes. 

1 Gj 20) &) 

Prt 
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REGISTER 
CoNTENTS 


UsING THE 
PROGRAM 


SEQUENCES AND SERIES 


Program Keystrokes 


(2nd) MON (2nd) BGM [Rcl) 4 


Purpose/Comments 


Recalls value of n or n-1 and 
checks to see if it is odd or 
even. If odd, program trans- 
fers to HM. If even, pro- 
gram checks to see if flag 2 is 
set or unset. If flag 2 is not 
set, program transfers to sub- 
routine [z?) . If flag 2 is set, 
program recalls ar®-' from 
memory 6 and stops. 


Changes sign of quantity in 
memory 6 and checks again 
to see if flag 2 is set or unset. 
If not set, program transfers 
to (2?) ; if set, program stops. 


Exits learn mode. 


Note: Print commands may be omitted if the PC-100A is not used. 


Roo Ros n Ros Used 
Ro. a Ro; Used Ro: 
Ros korr Ros Ros 


Procedure 


For arithmetic progression: 


Enter a. 
Enter k. 
Enter n. 
Calculate t,. 
Calculate S,,. 


For geometric progression: 


Enter 0 in t register. 
Enter a. 

Enter r. 

Enter n. 

Calculate t,. 
Calculate S,. 


°This value is printed if the PC-100A is used. 


1-4 


Ros 


Display /Comments 


Basic NUMBER THEORY 


SEQUENCES AND SERIES 


(1) Find t, and S, for the arithmetic progression with a= 4, k=-2, and n= 12. 
(2) Find t, and S, for the geometric progression with a=2, r=3, andn=6, 


SAMPLE First, enter program 
PROBLEM carefully. 
(1) 


Enter the value a. 
Enter the value k. 
Enter the value n. 
Compute t,. 
Compute S,. 


(2) 
Enter 0 in t register. 
Enter the value a. 
Enter the value r. 
Enter the value n. 
Compute t, 
Compute S 


y 1. Find t, and S,, in the arithmetic progression where a=5, k=%, and n= 45. 
(Answer: t, = 21.5, S, =596.25) 

2. The first term of an arithmetic progression is 4 and the last term is 424. 
Find the sum of the sequence if k= 2. (Answer: n= 211, S, = 45154) 

3. Asn gets larger, what value does S, seem to approach for the geometric 

EXPLORATIONS 3 a x, st 

progression with a=4 and r= 4? (Answer: 8) 

4. Asn gets larger what value does t, seem to approach for the geometric 

progression with a=4] and r=.01? (Answer: 0) 


IREFERENCES/ Most basic mathematics texts include a discussion of sequences and series. 

INFORMATION See, for example, Charles D. Miller and Vern E. Heeren, Mathematics: An 
Everyday Experience (Glenview, Illinois: Scott, Foresman and Company, 
1976), chapter three. 


Basic NuMBER THEORY 1-5 


Greatest Common Divisor 


Given two integers a and b, a common divisor of a and b is an integer which 
divides both numbers, and the greatest common divisor (g.c.d.) is the largest 
such integer. The g.c.d., although not a particularly complicated concept in 
algebra and number theory, is used repeatedly to define properties and 
impose restrictions on results. In addition to the actual computation of the 
g.c.d., the procedure outlined in this section serves as a good demonstration of 
a computational algorithm, which, when systematically performed, yields the 
result. 


The most well-known algorithm for computing the greatest common divisor, 

and perhaps one of the oldest, is the Euclidean Algorithm, found in Book VII 

of Euclid’s “Elements.” Given positive numbers a and b (a>b), the algorithm 
proceeds as follows: 


1, Divide a by b and obtain remainder r,. 
a=bq +r, 0<r,<b 


Note that every integer that divides a and b will also divide r,, and, 
conversely, every common divisor of b and r, is a divisor of a. Therefore, 
the common divisors of a and b are the same as those of b and r,, and it 
follows that the g.c.d. of a and b equals the g.c.d. of b and ry. 


2. Now divide b by r, and find r.. 
b=rnq +re 0srn<7; 


The above remarks hold for the relationship between the pairs b,r, and 
T,I2, SO you continue the procedure until the remainder, r,, is zero. 


a=bq, +1, O=r,<b 
b=rnq +r O=r,<r, 
YT, =12q3 +13 0<r,<r, 
eee 
Tn-3 =Yp-2Qn-1 +I n-1 OS ra-1.<In-2 


Tn-2 =Tn-1Qn (r, =0) 


Because the remainder is always decreasing, it must eventually vanish. Since 
Tn-1 is a divisor of r,-2 and itself, it is the g.c.d. of all pairs rps, Tp-15 Tn-3y Tne2} +++ 


back to a, b. 


Once the g.c.d. of two numbers has been found, the least common multiple 
(the smallest number divisible by both a and b) can be easily computed. If d is 
the g.c.d. of a and b, then the least common multiple of a and b is 


m=ab/d 


1-6 Basic NUMBER THEORY 


GREATEST COMMON DiIvISOR 


Step # | Program Keystrokes Purpose/Comments 
P 4 y: rpo: 


OFF/ON Clears calculator and 
enters learn mode. 
| 000 | (2x) MEN LA] [s10) 1 
i (2) 2 


s 
THE 
PRoGRAM 


Stores b in memory 2. 


Divides a by b and finds r,. 
Advances b to memory | and 


2 stores r in memory 2. Then 
(=) i 2 {sto tests r to see if r=O; if not, 
2 [zt] Ln) program loops back to [CJ 'and 
| x=" 1 [2nd] repeats until r=0. Program 
| Pit] then calls r,_, (g.c.d.) from 


memory | and stops. 


Exits learn mode. 


Note: Print commands may be omitted if the PC-100A is not used. 


REGISTER Roo 
CONTENTS Re 2 
Rez b 
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Ww 
y- 
‘ 
HE 
AM 


— aie 
UsING T 
Procr 


an 
Nee 
SAMPLE 
PROBLEM 


FURTHER 
EXPLORATIONS 


REFERENCES / 
INFORMATION 


SSS SS I a 


GREATEST CoMMON Divisor 


Procedure Display/Comments 


Enter a. 
Enter b. 
Calculate g.c.d. 


°This value is printed if the PC-100A is used. 


Note that the time it takes to find the g.c.d. depends on how many times the 
program must loop through the iterative routine. 


1. Compute the greatest common divisor of 252 and 180. 


Procedure Display/Comments 
Enter program. 

Enter a. 252 [A] 252. 

Enter b. 180 (8) 180. 

Calculate g.c.d. (c] 36. gcd. 


2. Compute the greatest common divisor of 3331 and 729. 


Procedure Press Display/Comments 


Enter a. 3331 [A] 3331. 
Enter b. 729 (8) 729, 
Calculate g.c.d. 1. (3331 is prime.) 


1. Compute the least common multiple of: 
(a) 128 and 94. (Answer: 6016) 
(b) 756 and 48. (Answer: 3024) 


2. Modify the program in this section to yield both the g.c.d. and the least 
common multiple. 


3. If the g.c.d. of a and b is d, then it is possible to express d as a linear 
combination of a and b: 
d=sa+tb 


for integers s and t. The integers s and t can be found by back substitution 
into the Euclidean Algorithm. Write a program for computing s and t as 
well as the g.c.d. 


C. T. Long, Elementary Introduction to Number Theory (Lexington, Mass.: 
D. C. Heath and Company, 1972), pp. 33-41. 
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Prime Number Testing 


The question of whether or not a given integer N is prime or composite has 
not been solved, and only partial answers have been obtained. It was proved 
by Euclid (about 300 B.C.) that there are infinitely many primes. It is also 
possible to show that the primes occur less and less frequently among the 
OsjECTIVE larger integers, with estimates on the density of occurrence. However, the 
computation or testing of primes is still of interest, and new large computers 
have been employed to generate larger and larger primes. Aside from 
answering questions about the factorization and divisors of integers, the 
investigations are purely intellectual, but problems of this kind are still of 
interest to many people. 


The computation and testing problem to determine prime numbers has led to 
the discovery of many interesting properties for the natural numbers. 
Investigations include estimates for the number of primes less than a large 
number N, formulas which yield primes for certain sequences of integers, and 


Facts / the spacing between consecutive primes. 
THEORY 


A simple and straightforward scheme for determining if a number N is prime 
is one called the Sieve of Eratosthenes, after the Greek mathematician, 
276-194 B.C. The method is to write down all integers from 1 to N, then to 
leave 2 and strike out all even numbers after 2, then leave 3 and strike out 
every third integer after 3, next leave 5 and strike out every fifth integer, and 
so on. What remain are the primes, and if the procedure is followed up to N, 
then the nature of N will be revealed. This is obviously a lengthy process. 
However, the computation can be shortened by generating only the primes 
up to VN N and testing these as divisors of N. As you test N with integers below 
VN, you are also “automatically” eliminating the possible divisors above 
VN. The possible divisors converge at \/N. 


The following program makes it easy to reduce the number of integers 
eliminated and to perform division testing on a larger set of numbers. For 
example, multiples of 2 and 3 could be eliminated, as is done in the program 
for prime factorization, but it is computationally simpler and still efficient to 
eliminate the even divisors only. The algorithm for testing N is to divide N by 
all odd numbers greater than 2 and to terminate the procedure when a divisor 
is found or if the testing divisor is greater than \/N. 


The length of time the test requires depends on how many times the program 
loops through subroutine . Be sure to allow several seconds for testing 
large numbers. 
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Prime NuMBER TESTING 


Step + | Program Keystrokes Purpose/Comments 
N [LRN] 


OFF/ON LRN) Clears calculator and 
enters learn mode. 


THE 
PROGRAM 


[A] (Sto) 1 (zx) Stores N and checks to see if 
N=1. If N=], program trans- | 
2E fers to LE) . Divides N by 2 and | 


checks for remainder. If | 
remainder =0, transfers to 2] | 
Checks to see if N=3; if so, 
transfers to [©]. Stores 3 and 
VN for later testing. 


aaga- 
~HEGe 
eee 
eo ae 
Bee 


030 Divides N by 3 and checks for 
remainder. If remainder=0, 


transfers to (2). If remainder 


e) 


i] 


[RCl] 2 #(), increases divisor by 2 and 
= tests against \/N. If divisor < 
VN, loops back to CB), 

MOH [c) frei) | | Pit | N is prime. Recalls N and stops. 
(D] [rct} | [2] N is not prime. Recalls flashing 
ica) N and stops. 

068 (E10 N<1 (not prime by definition). 


Clears display and stops. 


a 
a 


Exits learn mode. 


Note: Print command may be omitted if the PC-100A is not used. 


REGISTER Roo 
CONTENTS Ro N 


Ro2 Used 
Ro; Used 
Ros 
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?RIME NUMBER TESTING 


Enter N. N, if N is prime.° 

Flashing N, if N is not prime. 
UsING THE 0, if N<1. 
PROGRAM 


°This value is printed if the PC-100A is used. 


Determine if 8719 is prime. 


Procedure Preah: eae Display/Comments 


Enter program. 


SAMPLE 
PROBLEM 


Enter 8719. 8719. (in approximately 47 
seconds) 


8719 is a prime. 


1. Determine if 9161, 7351, 5559, and 4513 are prime. (Answer: Only 5559 
is not prime.) 


oN¢1 F 5 

2. Find the smallest integer N such that 2° — 1 is not a prime. 
FURTHER (Answer: N =5) 

COXPLORATIONS 


3. Rewrite the program in this section so that all multiples of 2 and 3 are 
stricken out before testing divisors (see the program for prime 
factorization). 


XEFERENCES/ C. T. Long, Elementary Introduction to Number Theory (Lexington, Mass.: 
WNFORMATION D.C. Heath and Company, 1972), pp. 59-73. 
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Facts/ 
THEORY 


Prime Factorization 


The Fundamental Theorem of Algebra tells us that each positive integer 
can be factored into a product of primes. This information is useful in 
finding common divisors of numbers, in factoring polynomials, and in 
simplifying the roots of numbers. 


It is obvious that the prime factors for a number N can be determined by 
dividing N by the integers less than N. This is not the most efficient method 
for computing the factors, however, since division by non-primes less than 
N yields no information. A better procedure would be to test only the 
primes less than N, but generation of the primes within a computational 
algorithm is time consuming. The algorithm used in this program is a 
combination of the above methods. 


Given a number N, divide by 2,3, and all larger odd integers (5, 7, 9, 11, 
13, 15, 17, 19, 21, 23, 25, ...). Although there are non-primes in this 
sequence which will provide no information, this sequence is easier to 
generate than only primes. Division is done successively by numbers in the 
sequence, and as each factor x is found, N is replaced by N/x before 
dividing by x again to see if it is a square factor or testing the next number 
in the sequence. Note that, if this procedure is followed, it is only necessary 
to test numbers up to the square root of N, since no number larger than 

\/N can be a square factor, and non-square factors will be divided out by 
numbers less than \/N. 
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2RIME FACTORIZATION 


Clears calculator and 
enters learn mode. 


000 oH (A) [iw Stores N and insures that flags 
BM 1 [Ny) (2nd) BEA 2 [S10] 05 1 and 2 are not set. 

010 (8) LB 5 Transfers to subroutine BE to 
(zt) i generate divisors (x); then 
| x=" He 0 06 tests to see if x = \/N. Clears 

exponent counter (memory 6). 

024 Lb Re] 5 (=) 1 Divides N by generated 
3) 4 [inv] Liat | sequence of divisors, testing 
[x:t] 0 EEN (0) [rcl) 6 each for divisibility. 

[x:t] 0 Ey (8) [Rc 
6 
Pit | hae | CB) 

057 mH [0 | ME 26 Increments exponent counter 
4 (Sto) 5 (z:t) 1 [nv] by 1. Replaces N by N/x and 
 x=t [Ret] |] checks to see if N/x=1. 

L Pit 6 Pit 
Adv | 

079 i) 1 (2) Display flashes and program 
+7) (=) stops, signifying that all 

factors have been found. 

087 La | 5 Displays last x. 
| Pit 1 | Pit 
Ade | CE) 

098 EG [inv Tests for divisors 2 and 3; 
Ga | Me finv) increases x by 2 to generate 
a 2 Mw 2 SM | sequence of divisors. 
(INV) 

112 


ag 
T 
- 5 
a" 

2 


Stores 2 as first divisor and 
sets flag 1. 


Stores 3 as divisor and sets 
flag 2. 


Exits learn mode. 


Note: Print commands may be omitted if the PC-100A is not used. 
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aa 
BG 
i 
a. 

a 


REGISTER Roo R,; N; factor 
CoNTENTS R,, Used Ros exponent counter 
Roe Ro; 
Ros Ros 
Ro, Used Ros 
Procedure Press Display /Comments 
[AJ factor, ° 
exponent, ° 
R/S) factor2° 
PROGRAM exponent, ° 
factor, ° (last prime 
exponent, ° factor) 
flashing display to show that last 


prime factor has been found. 


°This value is printed if the PC-100A is used. 


Find the prime factors of 707940. 


Procedure 


Display/Comments 


ered 
Enter program. 0 
PROBLEM Enter value of N and 2. Factor, 
calculate prime 2. Exponent, = 
factors. 
3. Factor, 3! 
4. Exponent, § ° 
5. Factor, = 
1. Exponent, 
19, Factor, ; 
1. Exponent, ; 
23. Factor; sate 
1. Exponent; a“ 
21. flashing — end of run. 


The prime factors of 707940 are (2)?, (3)*, (5)', (19)', and (23)’. 
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PRIME FACTORIZATION 


1, Determine the prime factors of 
(a) 7286. (Answer: 2' and 3643") 
(b) 94860. (Answer: 27, 3*, 5', 17', and 31’) 
2. A perfect number is one where the sum of its divisors is equal to two 
FURTHER times the number; for example, the divisors of 6 are 1, 2, 3, and 6, and 
EXPLORATION ‘ pie 2 
1+2+3+6= 12 (or 2X6). Is 8128 a perfect number? 


3. There is a theorem: An even integer is perfect if and only if it has the 
form 2°-1(2? — 1), where 2° — 1 is a prime. Check this theorem for P = 2, 
7, 13, and 19. ( 


REFERENCES/ C. T. Long, Elementary Introduction to Number Theory (Lexington, Mass.: 
UNFORMATION D.C. Heath and Company, 1972), pp. 42-47, 59-61. 


een | 


Basic NuMBER THEORY 


Facts/ 
THEORY 


Base Conversion 


Numbers exist independent of the names or symbols we use to describe 
them. For example, consider the number 1341, which we call one thousand, 
three hundred, and forty-one. Because the Hindu-Arabic number system 
commonly used today is based on 10, the number 1341 means 

1+(4X 10)+(3 x 10°) +(1 x 10°).In other words, the number is interpreted as 
a sum of multiples of powers of 10. 


Bases other than 10 can also be used, and in this case the symbol 1341 would 
be interpreted differently. In base 5 it would represent 

1+(4X'5)+(3X 5) +(1x5°). Using different bases to interpret numbers is 
both an interesting and a useful exercise. For instance, number 
representation in base 2 has proved to be extremely important in 
computer-related activities, since a computer typically stores and 
manipulates numbers in devices which only have two states — “ON and 
OFF,” which can be used to represent | and 0. 


Any integer greater than 1 can be used as a base, and any number can be 
expressed in any base. Furthermore, it is possible to convert a number 
expressed in one base (a) to its equivalent representation in another base 
(b). Since your calculator computes and displays in base 10 only, the 
following program makes conversions from base a to base 10 and then 
converts the base 10 result to its representation in base b. The formula for 
conversion to base 10 is: 

N = (x, a7") + (Xp-18777) +(xp.2a° 3) + ... +(x,a°) 


where N = the base 10 expression, 
x, = the digits or terms of the base a number, 
n = the number of digits or terms in the base a number 
and a = the base in which the number is expressed. 


To convert from base 10 to base b, the program first finds the largest power 
of b that will divide the base 10 number with a remainder less than b. It 
then uses an iterative division/multiplication routine to factor out the 
multiples of powers of b, generating the base b number one digit or term 
at a time. 


For bases larger than 10, the additional symbols used for notation are the 
integers themselves (i.e., 10, 11, 12, 13, etc.) because the calculator will 
display only numeric values. These are presented as multi-digit single terms 
in the program, and, when converting a number in base a that contains a 
multi-digit term, these are entered in subroutine as single terms (see 
example 2). 


As written, the entire program operates only on positive whole numbers, 
although subroutine can be used to convert decimals in base a to 
decimals in base 10 by entering a 0 as the number of terms. 
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BASE CONVERSION 


Step # | Program Keystrokes 


OFF/ON 


eee 000 | bi | CMs | Clears memories and stores 
1 2 base a, base b, and number of 
E11 5 terms, less 1, in the 
appropriate memories. 
015 | Lb | CC) (Re) | Converts base a to base 10. 
5 (2) (ee) nv) (Base 10 number stored in 
[ee] [=] SUM 00 | memory 0.) 
SUM 5 [R/S 
Note: the CEE] [Nv] [EE] 
sequence truncates the guard 
digits and insures proper 
rounding. 
036 (2nd) HMM [0] [Ret] 2 [z:t) Finds the largest power of base 
] (sum 4 0 C=) Re 2 b that will divide the base 10 
(y=) 4 (=) [nv) number. 
EEN (2nd) Ml (0) 
| A | Generates the base b number 
(=) [Ret] 2 [7] [Re 4 one term at a time. 
[2nd] 2nd) [TM (R/S) 
xX] CO ke 2 B®) Rey 
() (ee) Gav) Cee] (=) 
[Inv] [SUM] 4 (=) 
Ee) 04 0 [zt] 
4 El |B | 
a | 
[2nd] (2nd) BGM [RCL] Finds final term and stops. 
Wie (Rs 
RN Exits learn mode. 


1 


Note: Print commands may be omitted if the PC-100A is not used. 
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REGISTER 
ConTENTS 


UsING THE 
PROGRAM 


SAMPLE 
PROBLEM 


BasE CONVERSION 


Roo Used R,; Used 
Ro, a Ros 
Roe b R,; 
Ros Ros 
Ro, Used Ros 


Procedure 


Display/Comments 


Enter base a. 
Enter base b. 

Enter number of terms 
in N,. 

Enter each term in Nj. x, 


a 


b 
(n-1) 


Note: When each term has been entered, N, has been converted to N,,. To 
see N,o, recall memory 0. 


First term. 
Xo Second term. 
X3 Third term. 


Now, convert to base b. 


Xn Final term. 
flashing 0 — Signifies last term 
has been generate 


°This value is printed if the PC-100A is used. 


1. Express 2916 in base 7. 


Procedure 


Display /Comments 


Enter program. 0 
Enter a (10). 1014) 10. 
Enter b (7). 7 7: 


Enter number of terms 
in N. 


4 RA] 


(When converting base 10 to another base, you can bypass subroutine 
by storing N directly in memory 0 and going on to subroutine [J .) 


1-18 Basic NumBeERr THEO! 


IasE CONVERSION 


Procedure 


Enter N (2916). 
Convert to base b (7). SO 
X2 
X3 
Spe altXG 
4, Xs 
flashing 0. End of run. 


2916 in base 10 equals 11334 in base 7. 


2. Express [84(13)2],, in base 11. (Note that 13 in this number is a single 
term; therefore, the number contains four terms.) 


Procedure Display/Comments 


Enter base a (15). 
Enter base b (11). 
Enter number of terms 
in N (4). 

Convert to base 10, one 
term at a time. 


aa 


[Bj 
[8] 


Convert to base b (11). 


Xs, 
flashing — end of run. 


4 
8 
4 
13 
2 
(DJ 


[84(13)2] in base 15 equals [1(10)123] in base 11]. 


Basic NuMBER THEORY 1-19 


FURTHER 
EXPLORATIONS 


REFERENCES / 
INFORMATION 


BasE CONVERSION 


1, What numbers in base 10 are represented by [2(11)41],, and (7)s? 
(Answers: 11073 and 7) 


2. Revise the program to perform conversion of decimals in base a to 
decimals in base b. 


3. Modify the program to perform conversion of negative integers from base 
a to base b. 


4. Construct addition and multiplication tables for base 4 and base 8. 


C. T. Long, Elementary Introduction to Number Theory (Lexington, Mass.: 
D. C. Heath and Company, 1972), pp. 24-29. 
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Bi College 
Algebra and 
‘Trigonometry 


Introduction 


After basic arithmetic, algebra and trigonometry are probably the 
mathematical tools we use most extensively. They are usually considered to 
be the foundations upon which we build a wide variety of powerful 
mathematical applications in such areas as calculus, analytical geometry, 
physics, chemistry, biology — any field that requires exploration with 
mathematics. 


Algebra deals with general statements (equations or formulas) of 
mathematical relationships, while trigonometry applies specifically to the 
relationships between the sides and angles of triangles. Your calculator’s 
special algebraic and trigonometric function keys — and its programmability 
— can help you greatly in both these areas. Because computations of this 
type usually require much repetitive calculation, they are ideally suited to 
the programmable calculator. 


This chapter illustrates some of the applications of your calculator in algebra 
and trigonometry. Included are these topics: 


* evaluating and graphing algebraic functions, 

* evaluating polynomial expressions, 

+ solving linear and quadratic equations, 

* computing the area, sides, and angles of triangles, and 
+ graphing trigonometric functions. 


Although this is certainly not an exhaustive list of applications, we hope 
these examples will open the door and help you find new ways to use your 
calculator with algebra and trigonometry. 
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Facts/ 
THEORY 


Graphing Functions 


“A picture is worth a thousand words.”” Many times a picture can explain 
some difficult situation or illustrate relationships and functional behavior 
much better than any verbal description ever could. 


The following program calculates ordered pairs of a function f(x) over an 
interval from x=a to x=b with increments of d. You can then easily plot the 
ordered pairs to get a picture of the function. 


Typically a function y= f(x) may be graphically “pictured” on a rectangular 
coordinate system as a set of points. Each point is represented by a pair of 
numbers (x,f(x)) where for each x there corresponds some value f(x) which is 
determined by the function. Usually x takes on values from some initial 
value, a, to some final value, b, with a fixed increment or step of d. For 
example, the graph of the function 


f(x) =x? +2x+1 


from x= 1 to x=4 and with d=0.5 would consist of the points (1,f(1)), 
(1.5,£(1.5)), (2,£(2)), (2.5,£(2.5)), (3,£(3)), (3.5,£(3.5)), (4,£(4)). 


In order to use the following program you need to be able to enter the 
function f(x) into the program as a subroutine. This is easy to do if you follow 
the step by step procedure outlined in the “program” section, and illustrated 
in the example. (For extra information on subroutines and their use as part of 
programs see Personal Programming, pages IV-46 ff.) 


oa ee a a eee ee 
2-2 CoLLEGE ALGEBRA AND TRIGONOMETR' 


(SRAPHING FUNCTIONS 


o> | Step # | Program Keystrokes Purpose/Comments 


OFF/ON [RN] Clears calculator and enters 
learn mode. 
(2nd) HE (A) (S10) Enters a and stores it in 
memory 01. 
005 OE (2) 2 Enters b and stores it in 
memory 02. 
010 | tb | 3 Enters d and stores it in 
memory 03. 
(2nd) MO CO) (Ret) | (2nd) MM R/S) | Starts the program run and 
displays x. 
value for the x variable. 


CE] (Sto) 4 (nd) (nc) HE RS) | Transfers control to subroutine 
a Exits learn mode. 


LE] where f(x) is calculated. 
Note: Print commands may be omitted if the PC-100A is not used. 


THE 
Procram 


Displays f(x). 


Increments x by d and checks 
to see if x =b. If x Sb, f(x) is 

calculated. If x>b, display is 
cleared and program stops. 


(2né) MO CF) 


You insert your function keystrokes 
here, with memory 01 used as the 


Labels the subroutine where 
f(x) will be calculated. 


REGISTER Ro; a, initial value for x Ro; d, step value 
ConTENTs RR, _b, final value for x Ro, f(x) (current value of x) 
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GRAPHING FUNCTIONS 


Transfer the program to 0 
subroutine LE]. 
UsING THE 
Poncx ani Place the calculator in [LRN] 043 00 
the learn mode and Enter 
program the steps for your 
finding f(x). (Use RC 01 program 
whenever you need the for f(x). 
value of the x variable.) 
Make sure the last step (INV) (This step returns the 
is [INV) ; calculator back to the mair 


body of the program.) 


Take the calculator out of 
the learn mode of 


operation. 


Enter the initial x value, a 
a (where you'd like the 
graph to begin). 


Enter the final x value, b. b 
Enter the step value, or d 
increment, d. 
Start the program. a® 
f(a)° 
Continue to press oe 
for each new x and f(x). 
b° 
f(b)? 


0 Signifies end of run. 


°This value is printed if the PC-100A is used. 
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CSRAPHING FUNCTIONS 


Let’s use the program to find ordered pairs which will allow us to graph 
f(x) =x?+2x+1 from x=1 tox=4 with increments of 0.5. 


SAMPLE 
PROBLEM Enter program. 

Fix the decimal point for 

the desired accuracy. 

(For this problem we'll 

use 2.) 

Transfer control to 

subroutine CEJ. 

Put the calculator into 

the learn mode. 

Enter the program for Ol 

{(x),(Remember memory 2 01 

01 will be used to 1e& 

represent x.) 

Press [Inv] at the [INV] 

end of the program for 

f(x). 

Take the calculator out of 0.00 

the learn mode. 


Enter a. 1.00 
Enter b. 4.00 
Enter d. : 0.50 
Start the program. 1.00 a 


Continue to press to 4.00 f(a) 
find each new x and f(x). 


4.00 b 
25.00 f(b) 
0 End of run. 
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) GRAPHING FUNCTIONS 


115225 3354 


Sketch of the ordered pairs 


— 


. Graph f(x) = 5x? — 2x +4 for x=0 to x= 1 with increments of 0.1 
2. Graph f(x) = 2x? -3+4 for x= 10 to x= 20 with increments of 2. 


.o) 


. Find the roots of f(x) =x’ — 4x — 1.5. The roots of the equation are those 
points, x, where f(x) =0. (Answers: — 0,345 and 4,345.) 

4, Does the function f(x) =4x* — 3x’? + 2x +1 have any maximum points in the 

range x= — 10 tox=0? Caution: What happens when 2 3 Ee 

is pressed? How can you handle raising a negative number to a power? 


What limit does the function f(x) = a i approach as x gets larger and 
larger? 


n 


REFERENCES/ See Personal Programming — Subroutines, pp. 1V-48 ff. 
INFORMATION 


ee ee ee ee ee ee 
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Polynomial Evaluations 


Many problems in economics, physics, chemistry, business, and finance, as 
well as in mathematics, require the evaluation of polynomial expressions. 
The Master Library module has a program (ML-07) that will evaluate any 
polynomial expression for any real number. This can be useful when 


graphing a polynomial function is desired. 


Generally, a polynomial function, P(x), is written in the following way: 
P(x) = aq + a,x + ax? + 000 + ax” 


where a, is the coefficient of the variable x' for i=0,1,2, «+, n. 


Program ML-07 has a maximum value of n which is limited by the number of 
data registers available. The number of registers available must be equal to 
or greater than the value n+6. Normally in the TI Programmable 58 the 
calculator can handle up to and including n= 24, while the TI 

Programmable 59 can handle up to and including n=54. 


Facts / 
THEORY 


These limits can be increased by using the repartitioning method outlined in 
program ML.-02 (p. 9). Further help on repartitioning may be found in 
Personal Programming, pages V-22,29. 


The Master Library manual has additional information on using the program, 
so we'll go directly to our sample problem. 


a ee eo es 
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POLYNOMIAL EVALUATIONS 


Let’s use the program to help us graph P(x) =3—2.5x + 4x*— 2x* for x =0 to 5 
with increments of 1. 


Select the program 07 
from the Master 


Library. 

Fix the decimal to the 
desired accuracy. 
(Here we'll use two 
places.) 


(2nd) MH 2 


Enter n, the highest 
power of x. 


Now enter a 0 to tell 
the calculator we'll 
enter a, first. 


Enter each coefficient 
starting with ap. 
(Notice that we must 
enter a 0 for a since 
there is no x, term 
showing.) 


Next enter the value 
for x (in this case we'll 
begin with 0). 


Next let’s find P(1). 


Then P(2) 


0.00 


Display /Comments 


n 
Ao 

ay 

ay 

ay 

ay 

x=0.00 

P(x) = 3.00 

x= 1.00 

P(x) = 2.50 
x=2.00 

P(x) = — 2.00 
x=3.00 
P(x) = —58.5 

x= 4.00 

P(x) = — 263 
x=5.00 


P(x) = — 759.5 
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POLYNOMIAL EVALUATIONS 


The graph of the polynomial from x=0 to x=5 with increments of 1 would 
look like the following: 


l. a. Evaluate P(x) = 12—2x*+4,.5x* + 2x° for x=1, x= — 2.75, and 
x=11.175. (Answer: (P(1) = 16.5, P( — 2.75) = — 411.26, 
P(11.175) = 354594.23) 
b. Find a value for x that makes P(x) =0 (or 0.00 when rounded to nearest 
FURTHER hundredths). 


EEXPLORATION 


2. Does the polynomial P(x) = — 1+ 4x’ — 2. 1x° + 3.2x"* 
have a maximum value in the range x= — 10 to 
x= 10? (Answer: No.) 

3. Sketch graphs of the power functions P(x) =x, 

P(x) =x?, P(x)=x*, P(x)=x", and P(x) =x° for 
x=—10tox=10. 

4. Sketch the graph of P(x) =x*—x’ for x= — 10 to 
x= 10, Is there a maximum in the range? A 
minimum? 


RREFERENCES/ Master Library, pp. 24-26. 


[FORMATION Personal Programming, pp. V-22, V-29. 
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Facts/ 
THEORY 


Systems of Linear Equations 
(Master Library Program) 


Solving simultaneous equations can be a time-consuming process — and one 
often prone to simple arithmetic errors. However, there is a program in the 
Master Library that can take the drudgery out of solving simultaneous 
equations. Program ML-02 can normally solve up to six equations with six 
unknowns using the TI Programmable 58 and up to eight equations with 
eight unknowns using the TI Programmable 59. 


Program ML-02 uses a method involving matrices and determinants to solve 
systems of simultaneous equations. A detailed explanation is given in Master 
Library, p. 13. If you don’t know anything about matrices and determinants, 
that’s OK; just follow the procedures given below and in the section “Using 
the Program.” 


To solve n simultaneous equations with n unknowns, you must first write the 
system in the following form: 


1X1 + apoX2 toe tainXn =b, 
@g1Xy + AgoXy + eee + Asn Xn = by 


An1X1 1 An2Xo + eee + AnnXn = Da 
where for i=1, 2, 3, ..., n and j=1, 2, 3, ..., n; aj; and b, are fixed values and 
x; is the unknown. 


Suppose we have the following set of equations: 


2x + 3y +5z=12 
4x —2y+3.5z=7.5 
5.2y — l.lx—-6.3z= —24 


= SSS eee 
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SiysTEMS OF LINEAR EQUATIONS 
(MastTER Liprary PRoGRAM) 


To solve the set of equations simultaneously we would rewrite the set of 
equations as: 
2x, + 3x, + 5x, = 12 
4x, — 2x, + 3.5x3 = 7.5 
— 1.1x, +5.2x, —6.3x, = — 24 


where x, =x, x, =y, and x; =z. 


To use program ML-02, you would then arrange the coefficients, a;,, a2, «., 
Ann, in a matrix. Generally, this matrix would look like 


Ar, Ay2 wee Ain 


Ary Aa2 eee Aan 
Matrix A= se, Tene 


Ant Anz eee Qnn 


For our specific example we would have: 


2 3 5 
Matrix A=| 4 —2 3.5 
-11 5.2 -63 


Note that any a,, may be zero for a particular i and j but it must still be 
entered in the appropriate place in the matrix. 


The program calculates what is called the determinant for matrix A and uses 
the determinant in solving the system for a set of values, x1, X2, ..., Xn, that 
will make each equation in the set a true equation. If the determinant is 
zero, there is no solution for the particular set of equations you are trying to 
solve. 
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SysTEMS OF LINEAR EQUATIONS 
(MASTER LipraRY PROGRAM) 


Press Display /Comments 


Select the program from 02 0. 
the Master Library. 


7 
A. 
UsING THE ° 
PROCHAM Enter the number of [A] n 


unknowns, n. 


Enter the column 
number (j) you are going 
to begin entering. This is 
usually 1. 


- 


Enter each coefficient 
starting with the first 
column: 
ay, R/S 
Az) R/S A21° 
Aan ann” 
(Note: To correct an 
entry in column j, press 
j . Then reenter the 
entire column using the 
key.) 


Calculate the determinant® 
determinant used to find 
each unknown (you don’t 
need to know what this 
means). 
Enter a 1 to begin the 1 (2) 1 
process of entering the b 
values. 
Enter each b;: 
b, b,° 
by by’ 
Calculate each x. Start by , 
entering 1 to find x,; then | 1 Ha 1. 
press for each x. x,° 


°This value is printed if the PC-100A is used. 
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SYSTEMS OF LINEAR EQUATIONS 
‘MASTER Liprary PROGRAM) 


SAMPLE 
PROBLEM 


Let’s use the program to solve the system of simultaneous equations in our 
example: 
2x, + 3x2 + 5x; = 12 
4x, — 2x, + 3.5x, = 7.5 
— ].1x, +5.2x, —6.3x, = —24 


Display Comments 


Fix the decimal point 

for the desired accuracy 

(in this problem we'll 

use 3). 

Select the program. 02 
Enter the number of 3) 
unknowns (here n= 3). 


: 


Enter starting column 
number (j). 


Enter each a,, starting 
with the first column, 
(Enter each a,, even if 
ay, is 0.) 


2 
4 
1. 
3 
2 
5. 
5 
3. 
6. 


5 
3 


a 


Calculate the It will take 

determinant. about 10 - 20 
seconds to find 
the value. 


Enter in a 1 to begin 
the process of entering 
the b values. 


Enter each b,. 


a 
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FURTHER 
EXPLORATIONS 


REFERENCES / 
INFORMATION 


SYSTEMS OF LINEAR EQUATIONS 
(MASTER Liprary PROGRAM) 


Procedure 


Now we’re ready to 
calculate each x. First 
begin the routine. 


Display /Comments 


1.000 Notice it takes 
10-15 seconds 
to get the 
display. 


Then enter 1 to begin 
to find each x, 


Press (RS) to find each 


—1,525 This is x,. 
This is x,. 
This is x;. 


Solve the following systems of simultaneous equations: 
a, 2x; —3.5x, + 6x; = —1 

4x, + 6x, — 3x3 = 21 

12x, — 3x, + 4x; = 17 


b, 3x, + 4x, — 7x, = 2.7 
X, + 3x, — 7x3 + 12x, =11.7 
4x, — 2x, + 6x; + 7x, =21 
5x, + 6x, + 9x, = 13 


Master Library, pp. 9-13. 


— eee 
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Quadratic Equations 


One of the most practical formulas found in algebra is the quadratic formula 
used to find the roots of a quadratic equation. The following program can be 
used to find the roots of any quadratic equation, regardless of whether the 
roots are real or complex. 

OBJECTIVE 


The general form of a quadratic equation is 
ax? +bx+c=0 
Where a # 0. The quadratic formula used to find the roots of the equation is 


Facts / expressed as x: —b+\/b?—4ac 
THEORY x= = on ae 
2a 
or 
—b+b—4 —b—/b, — 4ac 
x, = SS ana So 


where x; and x, are the roots. 


The key to whether the roots are real or complex is found in that part of the 


formula called the discriminant, 
Vb? — 4ac 


If b?— 4ac>0, both roots are real. 
If b?— 4ac = 0, both roots are real and the same. 
If b?— 4ac<0, both roots are complex. 


When the roots are complex, they can be divided into their real and 
imaginary parts as follows: 
x, =R+id and x, =R-—id 
where R = —b/2a, 
i =\/-—l,and 
1 a Vine 


~ Qa 


The following program displays both roots if the roots are real and the values 
for R and d if the roots are complex. 
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2. 


Facts/ 
THEORY 


Systems of Linear Equations 
(Master Library Program) 


Solving simultaneous equations can be a time-consuming process — and one 
often prone to simple arithmetic errors. However, there is a program in the 
Master Library that can take the drudgery out of solving simultaneous 
equations. Program ML-02 can normally solve up to six equations with six 
unknowns using the TI Programmable 58 and up to eight equations with 
eight unknowns using the TI Programmable 59. 


Program ML-02 uses a method involving matrices and determinants to solve 
systems of simultaneous equations. A detailed explanation is given in Master 
Library, p. 13. If you don’t know anything about matrices and determinants, 
that’s OK; just follow the procedures given below and in the section “Using 
the Program.” 


To solve n simultaneous equations with n unknowns, you must first write the 
system in the following form: 


Ay yXy + AyoX2 toe +a,,X, =b, 
1X + AggXz + oe + AgnXn = by 
. 


AniXy + AnoXe + eee + AnnXn =Dp 
where for i=1, 2, 3, ...,n and j=1, 2, 3, ..., n; aj, and b, are fixed values and 
x; is the unknown. 


Suppose we have the following set of equations: 


2x+3y+5z=12 
4x — 2y +3.5z2=7.5 
5.2y — 1.1x—6.3z = — 24 


pe SS a eS ee 
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SYSTEMS OF LINEAR EQUATIONS 
IMASTER Liprary PROGRAM) 


To solve the set of equations simultaneously we would rewrite the set of 
equations as: 
2x, + 3x, + 5x, =12 
4x, — 2x, +3.5x, = 7.5 
— 11x, +5.2x, —6.3x,; = — 24 


where x, =x, X,=y, and x, =z. 
To use program ML-02, you would then arrange the coefficients, a;;, aia, «+. 
Ayn, in a matrix. Generally, this matrix would look like 


Arr Aya eee Ain 
Arr Anz eee Aan 


Matrix A= s 8 ee 
Ani Anz eee Ann 


For our specific example we would have: 


2 3 5 
Matrix A=| 4 -2 3.5 
-1.1 5.2 -63 


Note that any a,, may be zero for a particular i and j but it must still be 
entered in the appropriate place in the matrix. 


The program calculates what is called the determinant for matrix A and uses 
the determinant in solving the system for a set of values, x,, X2, ..., Xn, that 
will make each equation in the set a true equation. If the determinant is 
zero, there is no solution for the particular set of equations you are trying to 
solve, 


gk a Dn ee 
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UsING THE 
PROGRAM 


a 
SysTEMs OF LINEAR EQUATIONS 
(MaAsTER Lisrary PROGRAM) 


Procedure | Press | Display /Comments 
Select the program from GR) 2nd) HEI 02 | 0. 
the Master Library. | 
Enter the number of | (A) | n° 
unknowns, n. 
Enter the column | CB) | j 
number (j) you are going | 
to begin entering. Thisis | 
usually 1. | 
Enter each coefficient 
| starting with the first | 
column: 
An BS a3;° 
ao; R/S) a2,° 
fi | BS a” 
(Note: To correct an 
entry in column j, press | 
j(®).Thenreenter the | 
entire column using the 
key.) 
Calculate the determinant® 
determinant used to find 
each unknown (you don’t 
need to know what this 
means). 
Enter a | to begin the 1 
process of entering the b 
values. 
Enter each b;: 
b,° 
bs* 
Calculate each x. Start by 1, 
entering | to find x,; then 1, 


press for each x. 


°This value is printed if the PC-100A is used. 
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‘SYSTEMS OF LINEAR EQUATIONS 
i MaAsTER LIBRARY PROGRAM) 


Let's use the program to solve the system of simultaneous equations in our 
example: 
2x, + 3x, +5x; =12 
: 4x, — 2x, + 3.5x; =7.5 
views — 11x, +5.2x, —6.3x, = —24 


PROBLEM 
Display/ Comment 


Fix the decimal point 
for the desired accuracy 
(in this problem we'll 
use 3). 


Select the program. 


Enter the number of 
unknowns (here n=3). 


Enter starting column 
number (j). 

Enter each a,, starting 
with the first column. 
(Enter each a,, even if 
a ;; is 0.) 


fy 


2 

4 

1 

3 RS 

2 GA) 
3. 

5 

3. 

6 


A & 
Ef 
5 


Calculate the It will take 
determinant. about 10 - 20 
seconds to find 


the value. 


Enter in a 1 to begin 
the process of entering 
the b values. 


Enter each b,. 


i a ee ee 
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FURTHER 
EXPLORATION: 


REFERENCES / 
INFORMATION 


SysTEMS OF LINEAR EQUATIONS 
(MaAsTER Lrsrary PROGRAM) 


Procedure 


Now we're ready to 
calculate each x. First 
begin the routine. 


Display /Comments 


1,000 Notice it takes 
10-15 seconds 
to get the 
display. 


Then enter 1 to begin 
to find each x. 


Press [RS to find each | RS) 


1,000 


— 1.525 This is x. 
This is x2. 
This is X3. 


Solve the following systems of simultaneous equations: 
a, 2x, —3.5x, + 6x; = —1 

4x, + 6x, a 3x; = 21 

12x, — 3x, + 4x; =17 


b. 3x, + 4x3 — 7x, = 2.7 
X, + 3x, — 7x, + 12x, = 11.7 
4x, — 2x, + 6x, + 7x, =21 
5x, + 6x, + 9x, = 13 


Master Library, pp. 9-13. 
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Quadratic Equations 


One of the most practical formulas found in algebra is the quadratic formula 
used to find the roots of a quadratic equation. The following program can be 
used to find the roots of any quadratic equation, regardless of whether the 
roots are real or complex. 


[omer 


The general form of a quadratic equation is 
ax? +bx+c=0 
Where a # 0. The quadratic formula used to find the roots of the equation is 


expressed as —b+\Vb?—4ac 


2a 
or 
—b+\//b?—4ac —b—\/b.—4ac 
= a oo 


where x, and x, are the roots. 


The key to whether the roots are real or complex is found in that part of the 


formula called the discriminant, 
\V/b* —4ac 


If b?— 4ac>0, both roots are real. 
If b*?— 4ac = 0, both roots are real and the same. 
If b’— 4ac<0, both roots are complex. 


When the roots are complex, they can be divided into their real and 
imaginary parts as follows: 
x, =R+id andx,=R-—id 
where R = —b/2a, 
i = /-l, and 
\V/ 4ac —b? 
C= Qa 


The following program displays both roots if the roots are real and the values 
for R and d if the roots are complex. 
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QuaprRaTIC EQUATIONS 


Program Keystrokes Purpose/Comments 


OFF/ON [4] Clears calculator and enters 
learn mode. 


(2nd) MO CA) (0) 1 (Xx) 2 ES) Stores a and 2a. 
[S10] 4 [R/S 


(2nd) MON (8) [Sto] 2 [R/S Stores b. 
i [ (2nd) MO [c) (so) 3 RR) Stores c. 


(2nd) MO (0) (2nd) ] (2nd) MM =| Sets flag 1 for calculation of 
x,, then loops to LA | 


to calculate b* — 4ac. 


Unsets flag | for calculation 
of x2, then loops to | a | 


Calculates b* — 4ac, then 
tests to see if result < 0. If 
so, roots are complex and 
program transfers to 
HM to compute R and d. If 
results => Q, roots are real 
and program calculates 
discriminant (\/b* — 4ac). If 
flag 1 is set, transfers to 

to compute x,. If 
flag 1 not set, changes sign 
to compute xX». 


Calculates real root and 
stops. 


Calculates R and stops. 
Then computes d and stops. 


Note: Print commands may be omitted if the PC-100A is not used. 


REGISTER Roo Res 
ConTENTSs RR, a Ry 2a 


Exits learn mode. 
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QUADRATIC EQUATIONS 


(Procedure [Press| Display/Comments 


— 

\) Fix decimal for desired 
SS ly accuracy, 
UsING THE Enter data. 


PROGRAM 
a 


b 
c 


Calculate x,. | ) If root is real. 


Flashing to signify 
complex roots. 

If roots are complex 

(flashing display), clear 

error condition and 

calculate d. 


If x, is real, calculate x. 


°This value is printed if the PC-100A is used. 


1, Find the roots of the equation 2x*— 1.5x+6=0. 


Enter program. 0 

Fix decimal for desired 0.00 We'll use 2- 

accuracy. place decimal 
setting for 
convenience. 


Enter a. 2) . Display shows 
2a. 


SAMPLE 
PROBLEM 


Enter b. 15 
Enter c. 6 (c) 


Compute x,. (0) R—flashing. 
Indicates roots 
are complex 
and R=0.38. 


Calculate value of d. 


The roots are: 
x, =.38+ 1.69i and x, = .38 — 1.693 
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y, QuaprRaTIC EQUATIONS 


2. Find the roots of the equation 4.1x* + 7.5x —2=0. 


Procedure Display /Comments 


Enter a. 
Enter b. 


Enter c. 


Compute x,. Real root. 


Compute x. 


The roots are: 


x, = 0.24 and x, = — 2.07. 


1, Find the roots of the equation 3x? = 15. (Answer: x, = 2.24, x, = — 2.24.) 


2. The frame around a square picture is 4 cm (approximately 1.5748 inches) 
wide. If the area of the picture is one-half the total area (picture and 


frame), what are the dimensions of the frame? (Answer: 27.31 cm by 
FURTHER = aks eee : 
27.31 cm or 10.75 in. by 10.75 in.) 


REFERENCES/ See the quadratic equation program in Personal Programming, 
InrorMaATIoN — pp. IV-79—IV-83. 
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Trig and Triangles 


OBJECTIVE 


Facts/ 
THEORY 


The study of triangles has fascinated mankind since early Greek 
mathematicians first began explaining them. Many useful and practical 
discoveries have come about through the analysis of this interesting shape. 
The following programs from the Master Library incorporate the Law of 
Sines, the Law of Cosines, Heron’s Formula, and the relationships of angles 
to help us explore triangles and find missing parts of triangles. 


The sum of the three angles of a triangle equals 180". This simple fact is very 
useful when searching for lengths of sides and measures of angles of a 
triangle. If we start with the triangle 


and designate each angle by its vertex, the following laws apply: 


The Law of Cosines: c? =a’ +b’ — 2ab cos C 
or a? =b’?+c*—2be cos A 
or b?=c? +a’ — 2ac cos B 

The Law of Sines: sin A _ sin B_ sin C 


a b c 


Heron’s Formula proves useful for finding areas of triangles when the lengths 
of the three sides are known. 


Area = \/s(s—a) (s—b) (s—c) 


where s = acute 


Program ML-11 will be used to find the remaining angles and sides if you 
know the following: 


SSS___ (You know all three sides and are looking for the 
measurements of the angles.) 


SSA (You know two sides and a non-inclusive angle and are 
looking for the other side and angles.) 


SAS ___ (You know two sides and te inclusive angle and are looking 
for the other side and the other angles.) 
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Program ML-12 will be used to find missing angles and sides if you know the 
following: 
ASA (You know two angles and the inclusive side and are looking 
for the other two sides and the third angle.) 


SAA (You know two angles and a non-inclusive side and are 
looking for the other sides and angle.) 


Programs ML-11 and ML-12 will also help you find the area of the triangle if 
the lengths of the three sides are known. 


The Master Library manual has instructions for using the programs, so we'll 
go directly to our examples. It’s a good idea to follow the side and angle 
designations given in the Master Library User Instructions to make sure you 
keep track of the correct sides and angles. 


Let’s use the programs to find the missing parts of the following triangles: 
1, C=30°, a=45m, b=42m 


Display/Comments 


lo 
SAMPLE 
PROBLEM 


Select the program ll 0. 
desired. 

Fix the decimal to Mm 2 0.00 
desired accuracy (we'll 

use two places). 

Instruct the program | (nd) IG 0.00 
to begin. 

Enter a. 45.00 
Enter b. 42.00 
Enter C. 30.00 


Calculate c. 
Calculate B. 
Calculate A. 


22.70 Side c is 22.7 m. 
67.67 B is 67.67’. 
82.33 Ais 82.33°. 
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Select the program. 
Select radian mode. 


Enter a. 
Enter B. 


Enter C. 


A is 1.57 radians. 
Side b is 9.61 cm. 
Side c is 5.55 cm. 
Find the area. (Since The area is 26.68 
we've calculated the cm’. 

missing parts, the 

lengths of sides a, b, 

and ¢ are already 

stored in the proper 

memories.) 


Calculate A. 
Calculate b. 


Calculate c. 


=) 
C=] 
(DJ 
CE] 


1. One side of a regular pentagon inscribed in a circle is 10 cm long. What is 
the radius of the circle? (Answer: 8.51 cm) 


2. The angle of elevation of a radio tower on the top of a building is 45° (at 
the base of the tower). The angle of elevation of the tower is 60° (at the 
top of the tower). Both angles were taken from a point on the ground 75 m 
away from the base of the building. How tall is the building? How tall is 
the tower? (Answers: 75 m, 54.90 m) 


FuRTHER 
EXPLORATIONS 


3. A navigator locates his position, A, on a map. He is 75 km due west of city 
B and 94 km from city C. The distance between B and C is 38 km. Find 
angle A (in degrees). (Answer; 22.60") 


RerereNnces/ Master Library, pp. 34-44. 
UNFORMATION 
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Facts/ 
THEORY 


Trig Functions 


Trigonometric functions are periodic and their graphs resemble waves. We 
are daily being bombarded by waves of all kinds, sound waves, ultraviolet 
rays, infrared waves, and many types of electromagnetic waves. Graphing 
and understanding trig functions can provide not only practical information 
but also much aesthetic pleasure. The following program can help you graph 
the sine, cosine, and tangent functions, as well as help you explore 
periodicity, phase shifts, amplitudes, and translations of trig functions. 


The graphs of trig functions follow repetitive patterns. Understanding the 
various aspects of these patterns can help simplify graphing the functions. 


To exemplify some of the various aspects of trig functions, let’s look at a 
simple sine curve. 


f(x) 


f(x) = sin x 


Notice that in this case the maximum f(x) value is +1 and the minimum {(x) 
value is — 1. One half the vertical distance between the maximum and 
minimum points is called the amplitude of the wave. Notice that every 360° 
the wave repeats itself. The value P where f(x +P) = f(x) (in this case 360’) is 
called the period of the function. 


Another graph that will show us some useful properties is f(x) = sin (x +90’). 


f(x) = sin (x +90’) 


The graph of f(x) = sin (x + 90°) looks like the graph of f(x) = sin x except for a 
shift to the left. This shift is called a phase shift. * 
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One more graph which is useful in showing shift patterns is f(x) = sin x+1. 


270° 360° 


=I f(x) = sinx+1 


The graph of f(x) = sin x+1 looks like the graph of f(x) = sin x except for an 
upward shift of one unit. 


Generally speaking, the following family of functions can help you better 
understand what’s going on: 


f(x) =a sin [b (x—c)] + d 
where the amplitude of the function is|a|, the period of the function is 360", 


a phase shift left or right takes place depending upon the value of ¢ (left 
if e<0, right if c>0), and a shift up or down depends on d (up|d| units if 
d>0, down|d|units if d<0). 


The ideas on amplitudes, periods, and phase shifts can be similarly applied to 
the other trig functions. Note: Basically, circular functions are very closely 
related to trig functions. Whereas the domains of circular functions rely on 
the unit circle and 7, the domains of trigonometric functions are angular. For 
simplicity’s sake, we are working with trig functions and use angular 
measurement. However, the program which follows can be changed to 
radian measure by simply pressing before you use the program and 
inserting radian measures for angular measures. 


The following program allows you to enter the values of a, b, c, and d, and 

m, n, andi (where m is an initial x value, n is a final x value, and iis the 

value of an increment) and then to calculate and display the points (m, f(m)), 
(m +i, f(m-+i)),... (n, f(n)) for f(x) =a [sin b(x—c)]+d, f(x)=a cos [b(x—c)]+d, 
or f(x) =a tan [b(x—c)]+d. Once the values are calculated, you can graph the 


functions and explore the results of changes in periodicity, amplitude, or 
phase shifts. 
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| step #, Program Keystrokes Purpose/Comments 
(LRN) 


Clears calculator and enters | 
learn mode. 


Stores a, b, c, and din 
memories 1-4 respectively. 


Stores m, n, and i in 
memories 5, 6, and 7. 


Starts program to evaluate 
f(x) =a sin [b(x —c)]+d. 
Ordered pairs are displayed 
(and printed if the PC-100A 
is used; otherwise, print 
commands are ignored). 
Subroutine (22) increments 
x byi. 


Tests new x value generated 
by subroutine (z?] . If 

n—x<0, program transfers | 
to subroutine ; other- | 
wise it loops back to CC]. 


Increments x by i and 
subtracts new x from n. 


Ifn—x<0, display is 
cleared and program run 
stops. 


Calculates and displays 
ordered pairs (x, f(x)) from 
x=m tox=n step i for 
f(x) =a cos[b(x —c)]+d. 


Calculates and displays 
ordered pairs from x =m to 
x=n step i for 

f(x) =a tan [b(x —c)]+d. 


ee 
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Purpose/Comments 


Lot | LA | 1 iz | Calculates and displays the 
amplitude. 


Lt | HGH [rc] 2 Calculates and displays the 

360 [=] period in degrees. If radian 
measurement is desired, 
change 360 to 2 7. 


Exits learn mode. 


Note: Print commands may be omitted if the PC-100A is not used. 


REGISTER Ris Ros ¢ Ros 1 
ConTENTS Ras a Ro d Ro; i 
Roe 'b Ros im 


Fix decimal point to In most situations, n =2 for 
desired accuracy (n our desired accuracy. 
UsING THE places). 
PROGRAM 


~ 
i) 


If degrees are used. 
If radians are used. 
If grads are used. 


Choose the desired 
angular mode. 


Fy 


Enter a. 
Enter b. 
Enter c. 


Enter d. 


Bb eee 
AG 


Enter m. 
Enter n. 


Enter i. 
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Choose the desired 
program run. 
1. f(x)= 

a sin{b(x—c)]+d 
Press after 
each f(x). 


Display /Comments 


2. f(x) = 
a cos [b(x—c)]+d 


3. f(x) = 
atan [b(x—c)]+d f(m)° 
m+i° 


f(m +i)° 


4, Amplitude ({a]). 
5. Period (P). 


"Trig FUNCTIONS 


a. Graph the trig function f(x) =3 cos 2[(x— 10°)]+0.5 for x=0° to x = 360° 
with i=30". 


Procedure 


Enter program 
carefully. 


ra a Mek: 
SAMPLE 
PROBLEM 


Select decimal setting 
(we'll use 2-place 
accuracy). 

Select desired angular 
mode. 


Enter a, b, c, and d. 
a=3 
b=2 
c=10 
d=0.5 


Enter m, n, and i. 
m=0 
n= 360 
i=30 


Select desired program m, for 2 pauses. 
run: F f(m) 

f(x) = 

a cos [b(x —c)]+d 


Press after each m +i, for 2 
f(x). pauses. 
fm +) 


n, for 2 pauses. 
f(n) 

Indicates value of 
n has been 
reached. 
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150 180 210 


f(x)=3 cos 2(x—10°) + 0.5 


b. Graph the trig function f(x) =tan (x 3) forx=0 tox=7 withi= Be 


Display/Comments 


Select the desired 0.00 
angular mode. 
Enter a, b, c, and d. 
a=l1 1.00 
b=1 1.00 
3.14 
c=7/6 0.52 
d=0 0.00 
Enter m, n, and i. 
m=0 0.00 
n=7 3.14 
i=7/6 0.52 
Select the desired 0.00 m 


program run: —0.58 f(m) 


f(x) =a tan [b(x—c)]+d. 


0.52 m-+i 
f(m + i) 


Te eT I Oe eee ee 
2-28 CoLLEGE ALGEBRA AND TRIGONOMETR) 


Tric Funcrions 


Procedure 


| 6 


Bl 


als 
YN} [A 


—0.58 f(n) 


0 x=n 


jf 7/6 w/3 m/2 W/Z 50/6 


f(x) = tan (x —77/6) 


. Graph the function f(x) =3 sin x —4 for x= 180° to x = 360° with increments 
of 20°. 


. Graph the function f(x) = tan 2x for x =0° to x= 180° with increments of 10°. 


Furtuer 3. Graph the sine function whose period is 27/3 and whose amplitude is 4. 
ExpLorations 


. Show, by graphing, that the sin (—x)=—sin x. 


. Show, by graphing, that the cos (x 7) = —cos x. 
6. Graph 2 sin (7/2—x) and 2 cos x for x=0 to x= 2m. 
Rererences/ Most elementary trigonometry texts cover this topic. Also, if you are using 


InrormaTion the PC-100A printer, you may be interested in writing in subroutines 


commanding the printer to plot the generated data for you. See Personal 
Programming, p. VI-10, for a discussion of plotting data. 
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Introduction 


Calculus and linear algebra form an important part of the mathematical 
foundation from which scientists and engineers develop their special areas. 
Using these mathematical tools to solve particular problems can provide a 
deeper understanding of the basic ideas or concepts involved in these areas. 
The material presented in this chapter represents only a small segment of the 
numerical methods associated with calculus and linear algebra and their 
applications to the programmable calculator, but these can give you a basis 
from which to explore the whole area of numerical analysis. 


Many extremely complex problems in today’s scientific research are 
approached through mathematical models involving large sets of differential 
equations. The concepts of differentiation and integration from the calculus 
are examined in several of the programs here, not only illustrating the 
computational and limiting processes, but also showing how solution 
techniques can be developed. These techniques are very important, since 
new methods for solving these systems of differential equations are constantly 
evolving. 


Linear algebra has recently grown in importance due to the development of 
high-speed computational devices. Again, it is possible to model many 
problems in terms of a linear system of equations. These systems can be 
overwhelming in size, and more and more sophisticated methods are being 
used today to solve these systems with the aid of modern high-speed 
computing devices. The programs shown in this chapter introduce one of the 
basic techniques, row reduction, and discuss a problem, least-squares 
approximation, which reduces to the solution of a linear system. 


These examples, while they only suggest the many applications that are 
possible, should give you a place to begin your own exploration. 
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OBJECTIVE 


Neo 


Facts/ 
THEORY 


Approximating Roots of a Function 


One way to approximate real roots to an equation of the form f(x) =0 
involves a technique called the Newton-Raphson method. This method 
makes efficient use of the iterative capabilities of the programmable 
calculator. 


If we are given that f(x) is differentiable on [x,,x,], that x, is “close” to xp, and 
that f(x,) and f(x,) have different signs, f(x) =0 will usually have one root, x,, 
between x, and x». Basically the Newton-Raphson method assumes some 
approximation to the root (we'll call it x,), then replaces the curve y = f(x) by 
its tangent at (x,,f(x,)), and finds the point (x.,0) where the tangent intersects 
the x-axis. Generally, x, will be closer to x, than x,. 


If we use x, as our next guess and continue the process, we'll usually derive a 
set of real numbers x,x2,... Xn, such that as n + +00, x, -~x,. The equation of 
the tangent at (x;,f(x,)) is 


and, if we let y=0, we get 


f(x;) 
2 =X, f'(x,) 
or, more generally, 
os f(x,) 
seeeere EG) 
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.APPROXIMATING ROOTS OF A FUNCTION we 


The following program allows you to enter special subroutines for f(x) and 
f(x) and then approximates x, for any given n, using the Newton-Raphson 


method. 
Purpose/Comments 


| Clears calculator and enters 
| =) learn mode. 
THE 
PROGRAM Enters x, and clears the t 


register. 


Calculates x, ie) and 
f’(x,) 
stores the new “‘guess’’ in 
memory 1. Then 
decrements memory 2 by 1 
and checks to see if memory 
2=0. If not, loops back to 
calculate new 


approximation. 


E 


This is where you'll add 


your subroutines for f(x) and 


f(x). 
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APPROXIMATING ROOTS OF A FUNCTION 


Display/Comments 


Transfer the program CE} (RN) 033 00 “Goes to” 
2 to subroutine CE! and | Program steps for subroutine 
enter program steps f(x) CE]. 
ROGRAM 


for f(x) and f(x). Use 
01 wherever you 
need the x value. 


Note: the last program 
step in each subroutine 


must be (NV) [S8R) . 


Program steps for 
f’(x) 

[INV] 

x, 


0. Exits learn. 


Enter first 
approximation. 


Enter n. 


n (8) 
(o) 


Execute program. x,” This value 
should be close 
to X;. 


°This value is printed if the PC-100A is used. 


REGISTER = Rgy 

Contents Ry xX, 
R,. Used 
3-4 
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,APPROXIMATING RooTs OF A FUNCTION 


a 
74 


ir 


SAMPLE 
PROBLEM 


FURTHER 
EXPLORATIONS 


REFERENCES / 
INFORMATION 


Using the Newton-Raphson method, find a root for f(x)=x?—5. First let n=3 
and then n=5 to show how quickly x, approaches x,. (Notice that 0=x?-5 
has a root at x= \/5.) The derivative of x?—5 is 2x; therefore, f(x) =2x. 


Enter program. 0 
Transfer to subroutine CE] [RK] 033 00 
CE} and enter CO 1@) 
subroutines for f(x) and | 5 (0) [av) [2nd] 
f’(x). | to | moo 
[Ret] ] 2: (ae) 
(INV) 050 00 
TRN 0. 
Enter x, (we'll use 1 as 
our first “guess”’). 0 
Enter n. 3. 
Calculate x,. 2.238095238 x,n=3 


Now repeat process for 
n=5. 0 
5 


2.236067978 x,,n=5 


oa Be 


1, Find the roots of 2 cos x = x? (correct to four decimal places). 


2. Find all the roots of x*+2x*?—1=0 (correct to three decimal places), 
Hint: Be careful when using the key with negative values. 
(Answers: —1,618, —1, 0.618) 


3. The volume of a spherical segment is given by the formula 
V= (th) (3r—h), where r is the radius of the sphere and h is the height of 


the segment. Find h if r=1.5 cm and V=37cm', 


See any textbook covering numerical approximations, such as Samuel S. 
McNeary, Introduction to Computational Methods for Students of Calculus 
(Englewood Cliffs, N.J.: Prentice-Hall, Inc., 1973), pp. 110-115. 
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OBJECTIVE 


Facts/ 
THEORY 


Numerical Approximation 
of Derivatives 


The concept of the derivative is of fundamental importance in mathematics 
and in its application to real world problems. The derivative, in fact, 
measures the rate of change of most things that can be described 
mathematically. For instance, the acceleration of an object can be 
determined by taking the derivative of its velocity, etc. 


Numerical approximation of a derivative is often less complex than the 
actual mechanics of the derivation process itself and can be sufficiently 
accurate in most cases. Sometimes the only way to find the derivative of a 
function is through numerical approximation. Numerical methods are also 


useful for simple functions when a large number of values are to be 
evaluated. 


Numerical methods of approximating derivatives evaluate the mathematical 
function, f(x), at discrete intervals, h. The smaller the sampling interval, the 


more accurate is the approximation of the derivative. The following 
relationship is used for the approximation: 


Pq) =f se f(x —h) 
where f’(x) is the derivative of f(x). 


The following program can calculate the sample interval, h, for you, or you 


can choose it yourself. The calculated value of h is based on the magnitude of 
x as shown below. 


_ (.001) |x| if ix! > 0.01 
.00001 if|x! $0.01 


These values for h have been experimentally determined to work reasonably 
well. Its applicability is certainly not universal, however, and it should be 
used cautiously. You may want to try different h values to be sure you get the 
degree of accuracy required by the problem. 
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NuMERICAL APPROXIMATION 
OF DERIVATIVES 


Program Keystrokes Purpose/Comments 


OFF/ON [RN] Clears calculator and enters 
learn mode. 
oo a 


(2nd) MO CA) (Sto) | (Sto) 2 RF Stores values of x. 


0] 2 [RS 
007 (2nd) MEAN (2:t) 01 (2nd) ERM (c) 
.001 Ce) Re] 1 ns) EE (=) (8) 


Calculates h, based on 
magnitude of x. If |x|S.01, 
transfers toC€]. If |x|>.01, 
calculates h as .001 |x|. 


Enters .00001 as h. 


ll 
—) 
S 
Oo 
_ 


Calculates f(x +h), f(x—h), 
and sper) eB) i fix—h) to find 
(=) Grd) re 
WON CE) Labels subroutine for 


calculation of f(x). 


A 


Exits learn mode. 


Note: Print command may be omitted if the PC-100A is not used. 


REGISTER Roo Ro, h 
ConTENTS Ro, (x+h),(x—h) Ros f(x +h) 
Roo x Ros 
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NUMERICAL APPROXIMATION 
OF DERIVATIVES 


| Procedure | Press| 


Set decimal for desired Tn 
accuracy. 


Display /Comments 


USING THE 
= ae 


Enter keystrokes for 066 00 Enters learn 


f(x). Begin and end the | Program steps for mode at 
calculation with f(x). subroutine 
parentheses, rather (BE), 


than using the &] 
key, and recall 
memory register ] 
wherever the value of 
x is needed. 


When all steps are 
entered, end the 
subroutine with [NV] 
to insure proper 
return to main 
program. 


Exit learn mode and 0. 
reset program. | 
Enter x, x | 


Enter h, 
OR 
Calculate h. 


*This value is printed if the PC-100A is used. 
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NUMERICAL APPROXIMATION 
\OF DERIVATIVES 


4 Calculate f’(.1) and f’(2.1) for f(x) =3x*—2x+ 1. Let the calculator select h. 


Procedure fre. yd Display /Comments 


Enter program. 


A 


SAMPLE 
PROBLEM 


ic 
ae” 


Select two-place Wm 2 
decimal. 


Enter program for f(x). CE] (URN) 
(1) 3 [RCt] ] 
3 =o bal 
(Ret) ] 1 0) (Gv) 
Exit learn mode and (LRN) [RST] 
reset. 
Enter first x value. =]. EA) 
Calculate f’(.1). 
enter second x value. 9.1 [AJ 
Calculate f’(2.1). R/S 


In both of these cases (.001)|x| was used for h. You get the same results by 
manually entering this value for h. To key in a new f(x), press (HE) 
and enter the new function keystrokes. Don’t worry about writing over all 
the old f(x) locations as long as the new f(x) is ended with (2) [NV] : 


1. If f(x) = oe, find f’(.3) and £’(0). 


(Answers: f’(.3) = 1.023959895,; £’(0) =.0000000004) 
2. If f(x) =sin x, find sufficient values of f’(x) over the interval (0,7) to plot the 


FURTHER graph of f’(x). 
EXPLORATIONS 


3. Devise a program to compute f’’(x) in addition to f(x) by using the 
following approximation: 

F f(x +h) — 2f(x)+ f(x—h 

Pry) eft) fl) + feb 


REFERENCES/ H, P, Greenspan and D. J. Benney, Calculus—An Introduction to Applied 
InrorMATION Mathematics (New York: McGraw-Hill, 1973), pp. 177-183. 
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OBJECTIVE 


Facts/ 
THEORY 


Definite Integrals— 
Trapezoidal Rule 


One of the most useful aspects of a programmable calculator is the ability of 
the machine to perform iterative processes. Approximating definite integrals 
is an area of calculus where iterative processes are especially useful. One 
method, Simpson’s Rule, can be found in the Master Library (ML-09,10). The 
following program uses another common iterative method called the 
“Trapezoidal Rule” for approximating definite integrals. 


The trapezoidal rule works under the supposition that f(x) is continuous for 
the area of interest, x»<x<x,. If we divide [xo,x,] into n equal intervals of 


length h=“*—*) then 
x, h 
i f(x)dx = 5 [ fas) +2) +. ot Qf(x, 1) + xa] 
= 2 
where x, = % +h 
X = Xot+2h 
c= ee Sh 
X, = X+nh 


Assume that f(x) has the following graphic representation from xy to X,: 


The trapezoidal rule breaks the area under the curve into n trapezoids (each 
having a “height” of h) as shown below. 


The more intervals under the curve, the more accurate is the approximation 
of the area of interest. Using several different values of n for approximating 
an f(x) can show the degree of accuracy you have. 
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DEFINITE INTEGRALS— 
'TRAPEZOIDAL RULE 


Program Keystrokes Purpose/Comments 
OFF/ON Clears calculator and enters 
learn mode. 
CE) Labels f(x) subroutine. 


N (Ry) 
eo eo 
040 
064 
a a or 


[2nd] 
mn 2 
3 
Note: Print command may be omitted if the PC-1LOOA is not used. 


=r mae 


(0) 6 7 Calculates h and stores 
CO a =] 1 i Ei in register 4. 
3 Ee 04 


1 (LE) SUM 07 Calculates f(x.) and adds to 
register 7. 


Calculates total integral. 


REGISTER Roo Ro; Loop counter 
CONTENTS Ry; Xo Ros Used 

Ror “Xs Ro; Used 

Ros on Ros Xi 

Ros h Ros 


ee ee ee eee 
CaLcuLus AND LINEAR ALGEBRA 3-11 


3 DEFINITE INTEGRALS— 
TRAPEZOIDAL RULE 


Procedure teeta Pyotr | 


(eto) (LE) (LRN) 
CQ) Program keystrokes 
for f(x) D0) 


Display /Comments 


082 00 


Position program 
pointer for f(x) 
subroutine entry. 


UsING THE 
PROGRAM 


Enter keystrokes for 
f(x), assuming that x is 
in the display. If 
necessary, store x in 
register 08. Begin 
subroutine with a [O) 
and end with 


(NV) 
[LRN] 0. Exits learn 
mode. 


(0) [ixy) : 

Do not use E). 

Enter Xo. Xo 
Enter x,. Xn 
Enter n. 


Approximate integral. 


Xn 
ij f(x) dx® 
Xo 


To evaluate for 
different n, repeat last 
two steps. 
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DEFINITE INTEGRALS— 
TRAPEZOIDAL RULE 


FurTHER 
EXPLORATIONS 


REFERENCES / 
INFORMATION 


5 
Approximate the integral f (x? + 2x — 1) dx, first using 5 and then 10 
‘ 0 


Display /Comments 


intervals. 


Enter program. 


Go to label CEJ and 
enter f(x) subroutine. 


Enter Xo. 

Enter x,. 

Enter n. : 

Approximate integral 62.5 f(x) for 5 

using 5 intervals, intervals, 
(Allow about 


15 sec for 
calculation.) 


Approximate integral 61.875 f(x) for 10 


using 10 intervals. intervals. 


The approximation for 100 intervals is 61.66875, so the 10-interval 
approximation is fairly accurate. The value of n can be selected to yield the 
accuracy you need, 


DF a 
1, Approximate f e* dx, (Answer will vary, depending on the value of n. 
0 


For example, if n= 20, the approximation will be 16,63395884.) 


Qa 
2. Approximate f | sin x dx, using n= 10, Remember to use the radian mode 
here, (Anstwer: 0.) 
Most calculus texts discuss definite integrals in some detail. For example, see 


Lynn Loomis, Calculus (Reading, Mass.; Addison-Wesley Publishing 
Company, 1974), chapter 10, 
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OsjecTIVE 


| 


Facts/ 
THEORY 


Runge-Kutta Method 
(Systems of Differential Equations) 


Many methods of numerical solution for differential equations exist. The 
Euler Method discussed in the Physics chapter is reasonably simple to apply 
to ordinary differential equations, but the error produced at each 
approximation step is large unless the step size is very small. Therefore, we 
seek a method which will produce more accuracy but at the expense of 
increased computation time. Two such methods are Runge-Kutta and 
Predictor-Corrector. The Predictor-Corrector Method is discussed in 
conjunction with the Sedimentation problem in the Biology chapter. 


In this program the Runge-Kutta Method is applied to a system of ordinary 
differential equations. The program included here will solve a system of one 
or two differential equations. The ideas used in developing these methods are 
fundamental to an entire class of integration methods for differential 


equations, and will help to provide both technique and theoretical 
understanding. 


The technique behind any numerical solution method is to find a set of points 
(x;, y)) through which the solution passes, or almost passes, since only an 


approximation is found. The x, values are usually specified by setting a step 
size, Ax, and letting 


X)., =x, +Ax j=0,,1,2,..... 


The y, values are determined by the numerical scheme with the initial value 
Yo used as a starting point. 


The Runge-Kutta Method computes y,., by using the value of y, and the first 
few terms in the Taylor series expansion for y(x) about x;. The difference 
between the value of y at x,., and x, can be expressed as 


Yy-1 yy = aAx f(x,, y;) +bAx f(x; + aAx, y, + BAy) (1) 
where Ay =Axf(x;, y,) and a, b, a, and f are constants to be determined. 


The Taylor series for y;.,is 


A 2 
Yyer = Ys Ax ys +O yy oes 
The double Taylor series for f(x, + aAx, y, + BAy) about (x;, y;) is 


f(x; +aAx, y; + BAy)={(x,, y,)+adx 3h, ys) Hye ys) 


S aay: Of &,y;) O7F (X53, Ys). pop we O7E (Xs Y ) 
+ 1/2 \ a?(Ax) ae Papo yy + B(Ay) ay? Fe sph Se ae 
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This can be substituted into the right and left side of equation [1]. Setting the 
coefficients of 1, Ax, and (Ax)* on each side of the equation equal yields the 
following relations for a, b, a, and B. 


a+b=1 
ba=bf8=1/2 
One choice of these constants is 
a=0 b=] 
a=1/2 B=1/2 


Choosing these constant values, we have the following formula for y,,, in 
terms of y, and x;. 


Ax Axf(x;, 
Yor =y, tOxila, +E, ys + “Ae Ya) 


This is called a second-order Runge-Kutta formula, also called an open 
Newton-Cotes formula. 


Higher order methods can also be developed using the same procedure, 
simply by satisfying equation [1] to higher terms in Ax. For example, equating 
terms up to (Ax)* yields a fourth-order method with the approximating 


formula 
Ys.1=y, + 1/6 (K, + 2K, + 2K, +K,) 
where K, = Axf(x;, y;) 
K, = Axf(x; +5%y, +o ) 
K,; = Axf(x; +4x, yj +%) 
K, = Axf(x,;+Ax, y; +Ks;) 
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RuNGE-KuTTa METHOD 
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These formulas may be modified for a system of ordinary differential 


equations by applying the formulas to each equation in the system, with each 
f, as a function of x and the unknown functions y"”.. . y°’. This method 
yields the following general equations. 


Second-Order 


Ax 
ysti sy) + Ax, yt psy + Kan 0 Yi + Ria) 


Ax 
where K.,=9~ fi(xs, ys7s ee Ys'”?) 


Fourth-Order 


where K,, = pm ys 
K,, = Axf,(x; 4 Ax y, + Ku, i ys +n) 
Ky, = Axfi(x, + me yi” + Kau, rr het + San) 
Ky; = Axf, (x, +Ax, yy +Kau, make »¥3"" +Ksn) 
Note that the second-order equation may be written as 
yseh =y,'” +K,,, 


Ki Ke 


where Ka Axfi(x, +2 wea Ns (n) 4 hn ) 


where K,, = Axfi(x;, yy[?,...,y)') 


The following program will solve a system of one or two differential 
equations. To use the program on the TI Programmable 58 you must 
repartition the calculator (Press 2 EE 17). 


aun maui Bina Hn 


a 
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Program Keystrokes Purpose/Comments 


OFF Clears calculator and enters 
learn mode. 
[R/S] 


/ON 
OH (A) Stores Ax, Xo, yo‘, and yy” 


un 
5 


if necessary). 


( 
1 5 Moves j+ 1 values of x and 
y’s for new integration step. 


Stores j values of x and y’s 
to begin computation. Calls 
subroutine HE to compute 


Computes K,,, and stores it 
11 


in R,,. Computes y;‘? + Bus 
and stores it. If flag 1 is set, 
transfers to step #079. 

(Skips computation of K, 2.) 


in R,;. Computes j,°° + — 
and stores it. 


Computes x; + Ax and stores 
it. Calls subroutine HE to 
compute f, and fy. 


Computes K,,, and stores it 
in R,,. If flag 1 is set, 
transfers to step #110. 
(Skips computation of K, ».) 


Computes K,., and stores it 
in R,;. 


If flag 2 is set, transfers to 
subroutine CE]. Computes 


yoo Fea and stores it. If 


flag 1 is set, transfers to step 
# 137. 
2,2 


Computes y,‘? + Be 


Rel] 15 Ce) 2 (+) Re 3 EE) 
[S10] 09 
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| Step # | Program Keystrokes 


er pee 


Purpose/Comments 


Calls subroutine Hl to 
compute f, and fp. 
Computes K;,, and stores it 
in R,s. Computes y;"’ +K;; 
and stores it. If flag 1 is set, 
transfers to step #170. 


Computes K;,, and stores it 
in R,;. Computes y;"” +K;: 
and stores it. 


Computes x, +Ax. 


Calls subroutine HM to 
compute f, and fy. 
Computes K,,, and stores it 
in R,s. Computes y;?}. If 
flag 1 is set, transfers to stey 
#243. 


Computes K,., and stores it 
in Ry». Computes yj?) 


AB He 


Al 


Stores x;,, =x, +Ax in R, 
and displays x; .1. 


Recalls and displays yj} 
and yj). 


ale) 


el 


Computes 
yey; +K,, for 
second-order Runge-Kutta. 
If flag 1 is set, transfers to 
step #281. 


15 4) ka 3 E) SO 06 


Computes 
yit=ys? + Kas 
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Step # | Program Keystrokes Purpose/Comments 


(Rct] ] oe) 4 Computes x; ., =x; +Ax for 

(2nd) MM [R/s) (cto) [d) second-order Runge-Kutta. 
Transfers to subroutine [1] 
to display y,., values. 


Label for function 
subroutine. 


Note: Print commands may be replaced by MZ if the PC-100A is not used. 


REGISTER Roo Ax Ror X Riu Kea 

CONTENTS Ro. Rosy‘? Ris. Ke,2 
Roe y;' de Roo a Ris Kaa 
Ros yj a Ri f; Ri; Ky. 
Ro, Xjon Ri, f, Ris Kya 
Ros y; ri Ry» Kia Ris Ky» 
Ros ysri Ry Kie 
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UsING THE 
PROGRAM 


RuncE-Kutta METHOD 
(SysTEMS OF DIFFERENTIAL EQUATIONS) 


Enter subroutine for f, (2nd) BO 

and f,. Use the x and y 295 00 
values in registers 7, 8, | Keystrokes for 

and 9 when youneed_ | f, and f.. 

them. 


UNV) (SBR) 
{LRN 0. 


If you have only one 
equation, set flag 1. a 1 0. 


If you wish to use a 
second-order Runge- 


Kutta, set flag 2. [2nd} 2 0. 

Enter desired step 

size (Ax). [A] Ax 
Enter Xp. Xo 

Enter yo'"’. Yo” 
Enter yo (if y,0? 

necessary). 

Take integration step. | [8] Kas” 

Display y;*). yEx" 

(Optional) 

Display y;?) if yf2y° 


necessary. (Optional) 
Repeat for new | 
integration step. | 


°This value is printed if the PC-100A is used. 


UE Ee ee 
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RuncE-Kutta MreTHop 
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(1) Newton's law of cooling states that the temperature of a body changes at 
a rate that is proportional to the difference in temperature between the 
body and the outside medium. 


Suppose a thermometer is moved outside, where the air temperature is 
— 10°C, from inside a house where the thermometer is reading 24°C. 
Since the time rate of change, dy/dt, is proportional to the temperature 
difference, (y—(—10)), we have the differential equation 

dy 

— a om + 

T= ky +10) 
Assume the constant of proportionality, k, is equal to 0.23 and use the 
second-order Runge-Kutta formula to solve the differential equation for 
t=(0 to t=5 with a step size of 1. 


Enter program, 


SAMPLE 
PROBLEM 


Enter subroutine for f;. 


Set flag 1 to indicate 
one equation. 


Set flag 2 for second- 


order Runge-Kutta. 2 


Fix decimal for 
desired accuracy. Mm 2 


Enter desired step 
size. 


Enter to. 

Enter yo. 

Take integration step, 
Display y, value. 
Take integration step, 
Display yz value. 
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Display/Comments 


Continue until all 3.00 t, 
values have been 7.18 ys 
computed. ; 


(2) Consider a point mass leaving a plane with an initial velocity of zero. The 
Pp gap y 
body has two forces acting on it. First the body is pulled downward by 
gravity with a force of mg. However, there is also an upward force on the 


body which we can assume is proportional to its speed squared. Thus the 
total force acting on the body is: 


F=mg-—kv’ 


where k is the constant that describes the damping force. To find the 
distance the body has fallen at any time, t, we must solve the second- 
order differential equation 


We can use this program to numerically solve the equation for y by 
rewriting it as a system of two equations as follows: 


dy 
bao 
ON ip Ke 
f dt © ig 


Solve this system of equations using fourth-order Runge-Kutta and a step 
size of 1 for t=0 to t=10. Assume k=0.005, m=1, and g=9.8. Note that 


to = Yo = Vo = 0. Compare your results with those obtained in the Euler’s 
Method problem in the Physics chapter. 
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IRuncE-Kutra METHOD 
(‘SysTEMS OF DIFFERENTIAL EQUATIONS) 


Unset all flags and RST) 0 
clear the memories. 
Enter subroutine for f, i 
and f,. (LRN) 9 
10 LO 9.8 
(=) .005 
Re] 9 [22] 0) 
1] [INV 
(LRN) 
Enter desired step size. 14) 


Enter ty. 
Enter yo. 


Enter vo. 


Take integration step. 


Display y,. 
Display v, 
Take next integration 
step. 


Continue until all 
values are generated. 
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Runce-Kuttra METHOD 


(SysteMs OF DIFFERENTIAL EQUATIONS) 


The following values will be generated: 


1,00 


ti 
vy 


vy 


Ys 


Vs 


Yio 


Vio 


These results for the y-values are better than those obtained by Euler’s 
Method using the same step size. To get the same accuracy with Euler's 
Method you would have to use a much smaller step size, say around 0.01. 
You might note that since Euler’s Method gives the speed (v) at the midpoint 
of the interval, you cannot readily compare the speed values unless you 
choose a step size that would give you the values at the same points. 
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IRuNcE-Kutra METHOD 
“SYSTEMS OF DIFFERENTIAL EQUATIONS) 


1. Solve the second-order differential equation 
y’-2y’+y=0  y(0)=1, y'((0)=1 


by writing the equations as a system. 


FuRTHER dy ; 
IEXPLORATION a y(0)=1 


du 


—=9 — — 
Fn acini u(0) = 1 


Solve using Ax = | for values of y at x= 1, 2, 3, 4, 5. Compare the results with 
the actual solution 


y(x) =e* 
2. Find the solutions to the system 
Ye y+3u  y(0)=2 
ao ee 
du 


a u(0)=0 


at x =0.5 using Ax =0.5, 0.25, 0.1, and 0.05 with the second-order method. 
Compare your results to the actual values 

y(.5) =e? +e! = 7.757 

u(.5) =e? —e-'=7.021 


3. Using the same methods employed to solve systems of one or two 
equations, write a program which will solve a system of three differential 
equations. 


HReFerENcES/ Gerald B. Haggerty, Elementary Numerical Analysis with Programming 
IINFoRMATION (Boston: Allyn and Bacon, Inc. 1972), pp. 388-406. 


S. D. Conte and Carl de Boor, Elementary Numerical Analysis, 2nd ed. (New 
York: McGraw-Hill Book Company, 1972), pp. 336-340. 
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Curve-Fitting with 
Least-Squares Approximation 


When interpreting experimental data, a primary task is to find a function 
which will fit the discrete experimental results. Such a function exists, since 
the results of any continuous experiment are related to each other in some 
way, no matter how unusual or obscure the relationship may be. Because the 
exact function defining the relationship may be almost impossible to find, we 
usually look for an approximate function, one which will produce data close 


to the set of experimental data points and can be used to approximate the 
whole range of results within certain error bounds. 


OBJECTIVE 


The class of approximating functions must be chosen with care, and the 
specific function from this class must be computed carefully. The program 


listed here calculates a system of equations that can then be reduced to yield 
a polynomial of chosen degree. 


Given a set of data points [(x,,Y1),(x2,Yo) « « « (Xn,Yn)], the idea is to find an 
approximate polynomial of degree m in the form 


4 L P(x) =a) +a,x + ax? +... +ayx™ 
FActs/ where the errors [E, = y, — P(x,), i=1...n] are small. If n<m-+ 1, there is 
THEORY an exact fit, and this is just an interpolation problem. However, ifn>m+1, 

the errors (E,) are usually nonzero. In least-squares approximation the sum of 


the squares of the errors is made as small as possible. 


Consider the function 


n m 


f(a, «+» Am) = 2 (yi — fe ayx;)? 


Using calculus to take derivatives of each a, and to set them equal to zero (to 
find the extreme points), we have 


e) = ~ 
oT -22 jo-3 a,x; )x\" | =() 
Oa, i=] j=0 


for k=0, 1, 2,...m. This expression can be rewritten in two forms, 


z= yixs*—- D( D ayx,*)x,*=0 
i=! i=) j=0 


or (collecting coefficients for each a;) 


TDyix*— T (SZ x,!**)ay=0 
isl j=0 i=] 


3 ee ee ee eee 
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LEAST-SQUARES APPROXIMATION 


This is a set of m+1 linear equations in the m+ 1 unknowns ap, a1,... am. 
The set then can be solved by standard techniques, and the resulting 
polynomial is the least-squares approximation to the given data set. 


The question of selecting the appropriate degree of the approximating 
polynomial is not easy to answer. One method is to plot the data points on a 
graph and sketch a polynomial that comes close to the data points. The 
number of turns or “humps” in the sketch is one less than the degree of the 
suggested polynomial. (For other analytical methods, see page 281 in the first 


referenced volume at the end of this section.) 


The program shown below can be used to produce the linear system of 
equations 


nao +( = x)at:..4+( 2 x™an==z yi 


i=] i=] i=] 


(2 Xijaot+( 2 x’)at...+( 2x7 )a,=z yi 
i=] 


i=l i=] i=) 


(DxX™at( Dx™ at... F( 2 x’™an=zxu™y 


i=l i=l i=l i=l 


for the ao, a, .. . am Coefficients. Another program, like the row-reduction 
program listed later in this chapter or ML-02 in the Master Library, can then 
be used to solve this system. 


The program requires the use of 3m +2n+ 10 memory registers for data 
storage. Be sure to repartition the data/program registers appropriately if 
you need additional memories for the problem you are evaluating. Also, the 
program operates only if x values= 0 are used. If negative x values are 
present in your data set, you should adjust the program to calculate x* 
without creating an error condition. 


po eS es ls ee a 2 eee 
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Step # Program Keystrokes Purpose/Comments 
OFF/ON [RN Clears calculator and enters 
learn mode. 


(2nd) MOE CA) (sto) } 3 (4) 10 | Stores m and computes and 
stores the highest number of 
registers needed to store the 
sums for the linear 
equations (3m + 10). 


Stores n (number of data 
points). 


Stores x,,..., X, Starting in 
register 3m+ 1. 


Stores Yi sae wy Yn . 


Initializes registers for 
computation of the sums 

n 

= Kit. 

i=] 
Stores 2m in the t-register 
for testing later. Note that 
subroutine MEW is run for 
every value of k. 


n 
Computes = x;,* for 


kee Qe elm, 


Stores = x," beginning in 
i=] 

register 10. If k<2m, 

transfers to HM to 

reinitialize counters for new 


k. 
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L toi | al 3 St) 9 Initializes registers for 
2 0 4 computation of the sums 
(ST9] n 

Dyix,* 


i=l 


Computes 2 y;x,* for 
i=l 


k=0,1,...,m. 


EMG E 


Stores 2 y,x,*, If k2=m, 
i=l 


Bae 


transfers to MGM to recall 


results. if k<m, transfers to 
HG for new k. 


Initializes registers for 
recalling sums computed. 


Recalls and displays = x,* 
i=] 


fork=1, 2,..., 2m. Then 


recalls and displays 2 y,x;* 
i=l 


fork=0,1,2,...,m. 
When all sums have been 
displayed, a flashing zero 
shows in the display. 


Exits learn mode. 


Note: Print command may be omitted if the PC-100A is not used. 


‘REGISTER Roo Used Ry k R,. (Remaining registers used 
(ConTENTS R.: m Ros k R,, for summations and data 
Ro. =n, 2n Ro; Used Ri. storage, depending on 
Ros Used Ros Used R,; value of m.) 
Ro, 3m+10 Rog Used Rus 
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Display / Comments 
Enter degree of 3m +10 
5 3 polynomial, m. 
Enter number of data | | n 
points, n. 
Enter x, data. x Xi 
Xe 
Xn 
Enter y, data. } yi 
y2 
Yn 
Calculate coefficients | CE] C,° 2x; 
(C) and constants (K). C.° 2x,? 
C,° 2x,° 
Cra xe 
K,° Zyixi° 
K,° Zy,x;' 
Kae? 2yixi™ 
0 Flashing; 
indicates end 
of run. 


*This value is printed if the PC-100A is used. 


Note: Since the coefficients are repeated diagonally in the linear set of 
equations, each coefficient is calculated only once, in the order of first 
appearance. 
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Plotting these points indicates that a cubic polynomial will give good results; 
therefore, let m=3. 


Enter program. 
Clear memories before 
each program run. 


Enter m. 
Enter n. 


Enter x, data. 


Enter y, data. 


2, 
L 
1. 
Ce 


Calculate coefficients 
and constants for 
linear equations. 


66.89875 
0 Flashing—all 
values 
generated. 


p+] 
~ 
on 
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FURTHER 
EXPLORATION 


Curve-FITTING WITH 
LEastT-SQUARES APPROXIMATION 


Putting these values into their correct places gives this linear system of 
equations. 


5a + 10a, + 32.5a, + 122.5a, =0.45 
10a + 32.5a, + 122.5a,+ 497.125a, =4.555 
32.5a + 122.5a, + 497.125a,+  2096.875a; = 14.4625 


122.5a, + 497.125a, + 2096.875a, + 9045. 15625a, = 66.89875 


You can now solve the system by one of the methods discussed earlier. The 
resulting polynomial (rounded to four places) is 


P(x) = — 2.2464 + 7.0674x — 3.9112x* + 0.5561x° 


Use the program to compute the least-squares approximation to the data set 


using polynomials of degree 1, 2, and 3. Compute the error for each 
polynomial. 


REFERENCES/ Gerald B. Haggerty, Elementary Numerical Analysis with Programming 


INFORMATION 


(Boston: Allyn and Bacon, 1972), pp. 272-295. 


F. B. Hildebrand, Introduction to Numerical Analysis, 2nd ed. (New York: 
McGraw-Hill Book Company, 1974), pp. 314-326, 


Systems of Linear Equations 
(‘Row Reduction) 


THEORY 


There are several methods of solving simultaneous equations. The Master 
Library program ML-02 (see “Systems of Linear Equations” in the College 
Algebra and Trigonometry chapter) can be used to solve simultaneous 
equations, as well as to evaluate determinants and calculate the inverse of 
the coefficient matrix. The method shown here is row reduction, and this 
program is more efficient than the Master Library program for the specific 
task of solving linear equations. 


Because of the length of the program and the memory storage required, this 
program is restricted to the TI Programmable 59. Owners of the TI 
Programmable 58 should refer to the Master Library program mentioned 
above. 


Consider the following representation of a series of simultaneous equations. 


y1Xy + Axe +... + ainXn = by 
@a1X1 + ApoX2 +. oe + AsnXn = be 


Ani Xy a An2X2 a hy ef + aanXn =b, 


The coefficients can be assembled into the following matrix notation. 


[A,b] = 


ani aan Dh 


Three basic rules apply to the manipulation of a series of equations that 
naturally relate to the matrix representation of those equations. 


1. Because the given equations can be listed in any order, any two rows of a 
matrix can be interchanged. 


2. Both sides of an equation can be multiplied by some constant without 
changing the solution. Likewise, all elements in a row of a matrix can be 
multiplied by some constant without affecting the end result. 


3, Any two equations can be added together, as can two rows of a matrix. 
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SysTEMS OF LINEAR EQUATIONS 
(Row REDUCTION) 


When applied to equations, this means that the coefficients of one equation 
can be multiplied by a constant that will make the coefficient of one of the 
unknowns equal in magnitude but opposite in sign to the coefficient of the 
same unknown in another equation. When the two equations are summed, 
that unknown is cancelled out, leaving a simplified equation with one less 
unknown — the equation has been reduced by one unknown. 


Consider the following series of equations. 


x+2y=3 
3x+4y=1 


When the first equation is multiplied by — 3 and the resulting equation 
added to the second, we get: 


—3x-—6y=—-9 
3x+4y=1 
=d=-8 
laa 
This same method of reduction can be applied to matrices. 


1, Divide each element of the first row of a matrix by the left-most element, 


an. If a,, is zero, simply exchange the whole top row with some other row 


whose left-most digit is nonzero. Now perform the above operation. This 
makes a; equal to 1. 


2. Add multiples of the first row to each other row so that the first (left-most) 
element of each row is zero. For instance, if the first element of row 2, aa, 
is 3, multiply each element of row 1 by (—3) and add them respectively to 
row 2, making a, =0. If as, is — 2, multiply row 1 by (+2) and add it to 
the elements of row. 3, etc. Continue this process until the matrix has the 
following form. 

Brae caisy eet, Aa! «DG 

Aas Bias tersie. 2Aente (Dig 

Ose) (Bag ecie. iA’an. (Dig 


LAD ha stig pel 


, 
Aaat Bias esien (Ann Oe 


onz-oor 


lS en eS hn ce 
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“Row REDUCTION) 


3. Now ignore the first row and column and consider the resulting submatrix 
of n—1 rows. Proceed to reduce this new matrix just as we did the original 
matrix. Continue for each new submatrix until the following form is 
obtained. 

a’ a's - ie ain bY 

1 a's; age at a’on b’2 

0 1 or ske a’sn b's 


These represent the coefficients of a new series of simultaneous equations. 
X, + .a/,2X2 +.a/13X3 + alg .xn=b’; 
Xp + a'23X3 +—— on Xn =b’2 


X3+ ala x= (bb 
<7 
ie 
Sue 

X, =b’, 


Knowing that x, =b’, and substituting backward can eventually yield all the 
values from x, through x. 


The following program is designed around this 
method of row reduction. 


SYSTEMS OF LINEAR EQUATIONS 
(Row REDUCTION) 


Stores number of equations 
(n) and number of columns 
(n+ 1), 


(S10) 2 (STO) § (2nd) MM 38 Enters 12 for indirect 
memory storage of later 


data entries. 


7] — 
a] bo 


Stores data (a,, stored in 
memory 12, ajz stored in 
memory 13, etc.). 


Begins calculation. Clears 
flag 0 for looping purposes 
later in program. 


Calculates reduction factor 
and adjusts indirect memory 
addresses. Sets flag 0 to 
terminate loop next time 
around. 


i=) 
oo 
“1 


Adjusts indirect memory 
locations. 


id 
i=) 
wo 


Continues reduction of 
terms. Sets flag 1 to control 
loop later in program. 


gag 


BAWABHS & 
aa 


4 [inv) 
1 0) 7 
11 E) So) 
[Sto] 5 (S10) 
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SYSTEMS OF LINEAR EQUATIONS 
“Row REDUCTION) 


Had Program Keystrokes Purpose/Comments 


Yo | Hw irc) 6 Adjusts indirect memory 
locations for loops and 
recall of correct data. 


Continues reduction. 


| 8 | Continues reduction and 
RK sF1 Ee adjusts indirect memory 
Hm 9 [=:t] 0 xt) ia locations. 
(Ret) 10 (=) [Rct) [2nd] EE 9 (=) 

ind | (Ret) 

Le | 
(inv) [EE] Pit | 

(RCL Adjusts indirect memory 


location and checks to see if 
another loop is required. 


Displays flashing 1 and stops 
to signify end of run. All x; 


terms have been generated. 


Note: Print command may be omitted if the PC-100A is not used. 


REGISTER Roo Used Ros Used R,. (Remaining registers 
Contents Ro n Ro; Used R,; used as needed for 
Ro. Used Ros Used R,, data storage and/or 
Ry» ntl Roo Used R,; summation.) 
R,, Used R,. Used Rig 
R,; Used R,, Used Rie 


CALCULUS AND LINEAR ALGEBRA 3-37 


SYSTEMS OF LINEAR EQUATIONS 
(Row RepuctTion) 


Procedure Display/ Comments 
Enter number of 0 
i equations, n 
(see note below). 
PROGRAM 
Enter coefficients (a, ;) a,, Data must be 


and constant (b,) by 
rows. Continue for 


entered in this 
order. Data 


each equation. b, storage begins 
a,, in memory 
a,» register 12. 
b, 

When all values have Xi” 

been entered, Maw 

calculate x values. see 

Continue to press 4] es 

until all x values have 1, Flashing; 


been calculated. 


*This value is printed if the PC-100A is used. 


indicates all x 
values have 
been 
generated. 


Note: As many as six simultaneous equations can be solved with the power-up 
partitioning. For more equations, repartition the program steps/memory 


registers as needed. 
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SYSTEMS OF LINEAR EQUATIONS 
(Row REDUCTION) 


Solve the three following simultaneous equations. 
5x + 3y +4z=23 
—2x+3z=7 
3x—2y+z=2 


Enter n. 


SAMPLE 
PROBLEM 


Enter data by rows. 


ayy 
aie 
ays 
b, 


i] 


oe) 
EASES Et CROSB 69) SUC TRO: G2 GON OK 


FARR EREA GEE ob 
el 
| 


aay 
dee 
aes 
b. 


asi 


Asj2 
Ags A33 


bs 


Nr NWAIWONN WU 


Calculate x values. xX, =x 
X2=y 
X3 =Z 
Flashing — no 
more x values. 


58 


1, Investigate the solution procedure for a system of N homogeneous 
equations with N unknowns by finding the largest nonzero determinant 
contained in the coefficient array A, and then reducing the homogeneous 
system to a nonhomogeneous system of fewer equations. See pages 18-21 in 


the first reference listed below. 
ExPLORATIONS 


2. Investigate how the row reduction program can be used to find linearly 
independent sets of vectors. 


Rererences/ Howard Anton, Elementary Linear Algebra, 2nd ed. (New York: John Wiley 
InrormaTion and Sons, 1977), pp. 1-17. 


L. F. Shampene and R. C. Allen, Jr., Numerical Computing: An Introduction 
(Philadelphia: W. B. Saunders Company, 1973), pp. 145-161. 


eS ee eee 
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ci Statistics 


Introduction 


Most of us are familiar with some of the general aspects of statistics. We read 
about local crime statistics in our newspapers; we follow with interest the 
“win-loss” statistics of our favorite sports teams; we hear about the 
probability of rain tomorrow, the predicted increase in the cost of living next 
year, and so on. 


There are basically two types of statistics. One is descriptive statistics, which 
involves collecting, grouping, and presenting large sets of data in ways that 
can be easily understood or assimilated. The other kind, inductive statistics or 
statistical inference, is used to draw conclusions from your observed data — 
to estimate population parameters from sample data, for example, and/or to 
predict trends and explore probabilities. 


In all of these areas your programmable calculator can be an invaluable tool. 
The built-in statistical functions of the calculator and its programmability 
allow you to perform statistical calculations with ease and rapidity. You'll 
find examples in this chapter dealing with the descriptive measures of 
statistics (mean, standard deviation, variance, etc.), several kinds of 
distributions important in statistical analysis, linear regression, and the 
analysis of variance. These examples were selected to demonstrate the power 
and versatility of the programmable calculator in this field and to help you 
develop some of the techniques you need to explore the science of statistics 
even further on your own. 
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4 
y 


OBJECTIVE 


Facts/ 
THEORY 


Descriptive Measures 


When you are describing a large set of data, a great deal of information 
about the data can be gained when the proper statistical techniques are 
applied. Some of the most commonly used descriptive measures are the 
mean, the variance, the standard deviation, the moments about zero, the 
moments about the mean, skewness, and kurtosis. This section explores these 
measures and develops a program for their calculation. 


Here’s a set of numbers (they could be test scores, results of experiments, 
etc.): 


3 4 1 8 
6 ff 1 4 
8 5 3 3 
2 2 6 5 


Certain representative numbers, derived from the elements of the data set, 
may be used effectively to describe the set. The following paragraphs deal 
with these descriptive numbers (statistics) and how they are derived. 


MoMENTs ABOUT ZERO 
What happens if we 


(1) raise each element in the set to some power, 
(2) add the resulting numbers, and then 
(3) divide the sum by the number of elements in the set? 


The statistic obtained by using the first power in step (1) is the first moment 
about zero, also called the mean. The mean (or average) is a very important 
statistical measure, and your calculator has a built-in program to compute 
the mean for you, once your data are entered. 


Statisticians use two symbols to represent the mean, depending upon the 
kind of data they are evaluating and the information they want to convey. 
For example, let’s consider that the numbers given above are the scores 
made by an entire second-grade class on a particular test. If we want 
information about this particular class only, that is, the scores of the class 
make up the whole population we are evaluating, the symbol used for the 
mean is pt. If, however, we are looking for data about the performance of all 
the second-graders in the state’s public school system, the 16 scores are just 
our sample, from which we will make certain inferences about the whole 
population. In this case the symbol used for the mean is X. 


4-2 STATISTICS 


IDESCRIPTIVE MEASURES 


If the second power is used in step (1), the second moment about zero is 
generated; if the third power is used, you obtain the third moment about 
zero, and so on. 


The first moment about zero (the mean) is written as 


N 
where x, = the elements of the set, and 2x, =the sum of all the elements, 
i=l 
X= the mean or average, and N = the number of elements. The second 
moment about zero is written 


N 
=x? 
i=l 


N 


N 
where Sx?=x?+x3+x?+ ...x%. 


i=l 


N 
(When it is clear that all the elements of a set are to besummed, x; is 

i=l 
often written as =x,. We'll use this notation for simplicity from this point on.) 
The third and fourth moments about zero, then, are written 

2xt and 2x! 
N N 

MoMENTS ABOUT THE MEAN 
Another group of statistical data is called the moments about the mean. 
These are derived by 


(1) subtracting the mean (x) from each element (x;) of the set, 
(2) raising each result to some power, 

(3) adding the results, and 

(4) dividing the sum by the number of elements in the set. 
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DESCRIPTIVE MEASURES 


Thus the first moment about the mean is 


=(x,-X) 
N 
where 2(x,-X) =(x,-X) + (x.-X) . ... + (xy-X). The first moment about the mean 
is always equal to zero, since the differences obtained from elements greater 


than the mean are cancelled out by the differences obtained from elements 
less than the mean. 


The second moment about the mean is another very important statistic 
called the variance (o*), and the square root of the variance is the standard 
deviation (¢) or standard error. Both of these tell you something about the 


“spread” or grouping of your data. The second moment about the mean is 
written 


2=(x\-x)* 
o?=VAR= N ) 
and the standard deviation is 
2=(x\-x)? 
= N 


The symbols given above for variance and standard deviation are those used 
to indicate that data from a whole population has been evaluated. When we 
work with a sample, however, other symbols are often used and other 
methods employed to give a better approximation of population statistics 


(parameters). In this chapter the following notation and methods are used for 
sample data: 


A ap. 2(x,-x)* 
Variance = s*= = 
D(x, -x)? 
Sample standard deviation = s = ates 


where n=the number of elements in the sample. The calculation of the 
sample standard deviation with n-1] weighting (dividing by n-1, rather than n) 
gives a better estimation of o, the population standard deviation. Because 

the expected value of s is equal to a, s is called an unbiased estimate of o. 


The variance and the standard deviation are included in the built-in statistics 


functions of your calculator, and you may use either N or n-] weighting to 
compute these values. 


4-4 STATISTIC 


DESCRIPTIVE MEASURES 


The third and fourth moments about the mean are expressed as 


= (x,-x)° = (x,-x)! 
Soe eee a cae 


and these two values, along with the second moment about the mean, are 
used to calculate skewness and kurtosis. 


SKEWNESS 


Skewness is a measure of how symmetrical a curve your data would form if it 
were graphed: 


Ze E. 


Negatively skewed Not skewed Positively skewed 
(skewed to the left) (skewed to the right) 
g, <0 g,=0 gg, >0 


The equation for determining skewness (g;) is 
2 i-8)?/N 
i [ (x,-R)?/N]°? 
Kurrosis 


Kurtosis (gz) is a measure that indicates the peakedness of a distribution. 


\ & =0 
\ g2>0 ———— 


ees 
| 


The expression for kurtosis is 
a = (x,-x)*/N 
& = S(x,-x)/NF 


pe a OE er Nat PEE dS Sats hee VO crn ATi! |” Ns 8 
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4 DEscRIPTIVE MEASURES 


The program listed below incorporates the built-in functions for finding 
mean, variance, and standard deviation using either N or n-1 weighting. It 
then goes on to calculate skewness and kurtosis with N weighting. 


Program Keystrokes Purpose/Comments 


OFF/ON [RN] Clears calculator and enter 
learn mode. 


Enters x;; calculates and 
sums x," and x;* (x; and x, 
are automatically summed 
by the key 


sequence). 
(2nd) ME (8) [2nd] BEB [sto] Q [2nd] Calculates mean (1st 
GB irs) moment about zero). 
ae WON CC) (2nd) BOM 11 2nd) AB | Calculates o? with N 
weighting. 
(=) (2nd) EB (rvs) Calculates o with N 
weighting. 


(2nd) MOON (2nd) MGR (inv) [2nq) em 


(So) 8 (22) (2nd) WM (RS) [Rc 8 
(2nd) EW (rvs) 


(2nd) MON () ad) MO 11 STO) 14 
RG) 2 SO) 10 RO 3 fy) 
(2nd) WEN 10 (inv) (ng) MM jy 


Calculates s and s? with n-1! 


weighting. 


Calculates and stores 2nd, 
3rd, and 4th moments about! 
Zero. 


ei 


071 Calculates skewness. 
| Pit 
105 


Calculates kurtosis. 


(| WEBB 


EI 
al 


Exits learn mode. 


Note: Print commands may be omitted if the PC-100A is not used. 
4-6 STATISTICS 


DESCRIPTIVE MEASURES 


REGISTER 
CoNTENTS 


UsING THE 
PROGRAM 


Roo Ros =x; /N 

Roy Xi Ryo =x?/N 

Res x? R,, =x?/N 

Ry; N Ri. 2xi/N 

R,, Used Ri; 

R,; Used R,, VAR, 2(x,-x)?/N 
Rog Used Ry; 2(x;-x)°/N 

Ro; Rig 2(x,-x)'/N 

Ros Used Riz 


Procedure 


Clear memories and fix 

decimal for desired 

accuracy. 

Enter data. x . The key 
sequence counts your 
data entries for you. 


When all x; values 

have been entered, 

calculate mean. 
(or » for population 
data.) 


For population data 
(N weighting): 
1, Calculate 


variance. 
2. Calculate 

standard 

deviation. 


a eee 
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SAMPLE 
PROBLEM 


DESCRIPTIVE MEASURES 


Display/Comments 


OR 


For sample data (n-] 
weighting): 
1, Calculate 
variance. 
2. Calculate 
standard 
deviation. 


Calculate skewness 
and kurtosis with N 
weighting. 


g.°  Skewness 
g° Kurtosis 


*This value is printed if the PC-100A is used. 


Considering this set of numbers as sample data from a large population, 
calculate the mean, variance, standard deviation, skewness, and kurtosis: 


3 4 ] 8 
6 7 ] 4 
8 5 3 3 
2 2 6 5 


Procedure 


Enter program. 


Display/Comments 


0 


0. 

0.00 We'll use two-place 
decimal for this 

1.00 example. 

2.00 

3.00 


Clear memories and 
set decimal. 


Enter data by columns. 


Continue to enter 16.00 
data, pressing [A] 
after each entry, until 
all elements have been 


entered. 


joes A a ee Pe en ae ee 
4-8 STATISTICS 


IDEsCRIPTIVE MEASURES 


REFERENCES / 
INFORMATION 


Calculate mean. 


Calculate sample 
variance and sample 
standard deviation. 
Calculate skewness 
and kurtosis. 


You now have quite a bit of statistical information about your data set. You 
know that the mean (x) is 4.25 and the standard deviation (s) of your data is 
2.29. Therefore, you can expect that roughly one-half of your data is grouped 
in the area of X+s. That is, the range for about one-half of your elements is 
from 1.96 to 6.54. 


Since skewness is positive, you know that the curve representing your data is 
slightly skewed to the right. The negative result for kurtosis means that the 
curve is less peaked than a normal curve (we'll discuss the normal curve in 
later sections). 


Victor E. McGee, Principles of Statistics: Traditional and Bayesian (New 
York: Appleton-Century-Crofts, 1971), chapter 2. 


For additional information about the statistical functions of your calculator, 
see Personal Programming, pp. V-32ff. 


STATISTICS 


The Normal Curve 


Statisticians have found that the normal curve (normal distribution) 
approximates a vast number of real-life distributions. Also, even though the 
data for a population may not be normally distributed, calculations based on 

the normal curve can often be used if the sample size is large enough 
(generally, if n=30). Sample data tend to arrange themselves normally in large 
samples even when the population is not normal. 


INL 


Calculations of this sort have traditionally required the consultation of tables 
and standardized z-scores. Today’s programmable calculators, however, can 
help you find and graph the actual normal curve involved in a specific 
problem. The program in this section computes the areas under the normal 
curve and the y values needed to graph the curve. 


The appearance of the normal distribution for a population depends on the 
population mean () and the population standard deviation (0). If you know 
these values, you can graph the normal curve by calculating a y value for 
each x, in your data set. The equation is 


Facts/ 
THEORY 


ie (ase (x-1)2/202 


The total area under the normal curve is defined as 1. By evaluating the area 
under the curve between selected x, values, we can find the probability that 

a sample chosen randomly from the population will fall in that range. Thus, 

it is very important to be able to compute these areas under the curve. 


The following program solves for y and computes the areas under the normal 
curve using Simpson’s Approximation (Master Library program ML-09). 


4-10 


SraTISTIC 


"THE NORMAL CURVE 


Program Keystrokes Purpose/Comments 


OFF/ON [i Clears calculator and enters 
learn mode. 


THE 
PROGRAM 


Initializes program by 
clearing display and 


memories. 


(2nd) HO [A] [sto] 6 [RA Stores mean (p). 


(2nd) MO (8) (sto) 7 [z2) [Sto] 8 Stores o and o?. 

[RAS] 

(2nd) MO (Cc) (Gnd) MO (no) Loops to MEW to calculate 

[R/S] y. Displays y and stops. 

(2nd) MO (0) (2nd) BO 9 (A) RA Enters lower limit for 
ML-O9. 


[2nd] = CE} [2nd] a (8) 10 Enters upper limit and 
9 [c] ma 9 2) computes area, using n= 10 
(2nd) i RAS) for the approximation. 


Note: Print commands may be omitted if the PC-100A is not used. 


REGISTER Roo Ros o* 

CoNnTENTS Ro, —Ros Used by ML-09 Rog X; 
Rog pb Ryo Used 
Roz oO Ry 


ee 
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4 Tue NorMaAL CurRvE 


Initialize the program. 0. Clears 
oo memories and 


Eveceen Set decimal for desired Gn 


accuracy. 


Enter the mean and fe 
standard deviation. J o* 


To plot the curve, 5 Vig 
enter x, values and 
calculate y, values. 


Continue this step 
until the desired 
number of y, values 
have been computed. 


To find an area under 
the curve, enter the 
limits (x; values) that 
define the area. 
lower limit X; 
upper limit area® (Simpson's 
approximation.) 


°This value is printed if the PC-100A is used. 


If the mean weight of male students in college is 75 kilograms 
(approximately 165 pounds) and the standard deviation is 9 kilograms (about 
20 pounds), draw a normal curve for the population. Then find the 
probability that a male student selected at random will weigh between 80 
kilograms (174.6 pounds) and 85 kilograms (about 187.4 pounds). 


ie 
Lip 


SAMPLE 
PROBLEM 


te 


4) 
4 


a ae ee ee ee 


4-12 STATISTIC 


THE NoRMAL CurRVE 


Enter program. 

Initialize. 

Set decimal, if desired. We'll use 4- 
place decimal 
for this 


example. 
Enter the mean. 75,0000 u 
Enter the standard LB) 81.0000 o? 


deviation. 


Calculate y values for 0.0443 All other y 
plotting graph. Begin 0.0380 values will be 
by entering the mean 0.0239 less. 

to find the highest 0.0111 
point of the curve, 0.0038 
0.0009 
0.0002 
0.0000 


You have now computed the right side of the curve, Note that, although the 
computed value in the display appears to be 0, the curve actually never 
becomes zero. Check this by removing the fixed decimal setting. 


(NY) 
Lt 0000230489 


Set decimal to four places again and calculate the left side of the curve. If 
you use values at the same distances from the mean on each side, you can 
expect that the curve will be symmetrical. 
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4 


FURTHER 
EXPLORATIONS 


REFERENCES/ 
INFORMATION 


Tue NorMau Curve 


Procedure Display/Comments 


Now calculate the 
probability of 
randomly 
selecting a male 
student 

weighing between 80 
and 85 kilograms. 


80.0000 lower limit. 

0.1560 Probability 
(the area under 

the curve). 


yr 0.156 


40 45 50 55 60 65 70 75 80 85 90 95 100 105 110 
Weight in Kilograms 
Your chance of randomly selecting a male student weighing between 80 and 
85 kilograms is 15.6%. As you can see from the graph, most of the area under 
the curve is contained between p+ 3o. This area is over 99.7% of the total 
area. In other words, the probability of randomly choosing a male student 


who weighs between 48 and 102 kilograms (about 106 and 225 pounds) is 
99.7% or better. 


The probability of selecting a random sample that falls within the area p+¢ 
is given as 68%. Verify this probability with the program. 


M. Dean LaMont et al, Calculator Decision-Making Sourcebook (Dallas: 
Texas Instruments Incorporated, 1977), chapter 6. 


Victor E. McGee, Principles of Statistics: Traditional and Bayesian (New 
York: Appleton-Century-Crofts, 1971), pp. 78-84. 


4-14 STATISTI 


The Standard Normal Curve 


OBJECTIVE 


Facts/ 
TuEory 


Every normal curve is symmetrical around its mean; that is, the area defined 
by .—@ is equal to the area +0. This fact allows any normal distribution to 
be represented as a standard normal curve. The method is to use z-scores 
(also called z-values and standard scores) to transform raw sample data into a 
standard form. These z-scores are very important in statistical inference, and 
tables of z-scores are usually included in statistics textbooks. They are 
particularly useful when you want to compare observations obtained by 
different procedures. 


Your programmable calculator can help you compute z-scores for your data, 
and Master Library program ML-14 can be used to calculate the areas under 
the curve, once the z-score is known. 

Generally, z= * = x where x is the mean of the sample and s is the standard 
deviation. The handy thing about z-scores is that they have a mean of 0 anda 
unit standard deviation. Many statistical formulas are based on standard 
scores instead of raw scores or deviation scores because of the ease with 
which z-scores can be manipulated. 


Using standard scores is effectively the same as using the standard deviation 
as a unit of measurement. Notice: 


If x, =x, z= *—*=0 
s 
Ifx,=(e+s), z= SFI“ X =] 
If x,=(k—s), z= 1 


The standard normal curve expressed in z-scores is: 


You can readily determine how a particular z-score relates to the whole 
curve. Since the total area under the curve is 1, the area to the right of the 
z-score can be interpreted as the percentage of scores on the curve greater 
than your particular z-score, while the area on the left can be thought of as 
the percentage of scores less than your z-score. 
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= 
THE 
PRocRAM 


REGISTER 
ConTENTS 


THE STANDARDNORMAL CuRVE 


The following program computes z-scores when x, X, and s are known and 
also finds the areas under the curve to the right or to the left of your z-score. 


Program Keystrokes 


OFF/ON [RN 


Purpose/Comments 


Clears calculator and enter 
learn mode. 


Initializes for program by 
clearing display and 
memories. 


Stores X, s, and x, (in that 
order). 


ag 
=e 
; 
ur 
SI 
[a 
is} 
aD 


iI el 


7 [ea Calculates z-score for 
6 S| 


sample element x,. 


Computes area to the right 
of z. 


Computes area to the left ¢ 
Zz. 


Exits learn mode. 


Note: Print commands may be omitted if the PC-100A is not used. 


Roo Ros 5 

Ry, ML-14 Ror X 

Roe ML-14 Ros 

Rs; ML-14 Roy = Z-Score 
Ros R, Used 
Roy = & 
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THE STANDARDNORMAL CURVE 


Initialize program. 
—i Set decimal for desired 
Usinc THE é 
Pacer accuracy. 
Enter mean. 


Enter standard 
deviation. 


Enter sample element 
(xj). 

Calculate z-score. 
Compute area to the 
right of z. Area (z)° 


Compute area to the 
left of z. {1— Area (z)]° 


°This value is printed if the PC-100A is used. 


STATISTICS 4-17 


A Tue STANDARDNORMAL CuRVE 


A student scored 45 on a history test for which the mean grade was 53 and 
the standard deviation was 7.5. The student also scored 73 on an English test 
for which the mean grade was 78 with a standard deviation of 5.1. On which 
test was the student’s relative standing higher? What percentage of students 
did better on the English exam? 


Enter program. 0 


SAMPLE 
PROBLEM 


Initialize. 0. 


Set decimal, if desired. 0.00 We'll use 2-place 
decimal for this 
example. 


Enter class mean and 53.00 
standard deviation for ; 7.50 
the history test. 


Enter student’s grade 45.00 

on test. 

Calculate z-score. —1.07 z-score for 
history test. 
Initialize. 0.00 


English test and : 5.10 
calculate z-score. 73.00 


Now enter data for the 78.00 x 
s 


ms 


—0.98 z-score for 
English test. 


Compute area to the 0.84 Area to right of 
right of this z-score. z-score. 


These results indicate that the student did relatively better on the English 
test (since —0,98 >— 1.07) and also that approximately 84% of the scores in 
English were higher than his. 


REFERENcES/ Ya-lun Chou, Probability and Statistics for Decision Making (New York: Holt, 
INFORMATION Rinehart and Winston, 1972), chapter 13. 


= SS _.. - e  e e 


4-18 STATISTIC 


t-Distribution 


There are many times when the normal curve does not fit your needs, 
especially when you're working with a small sample (n<30). Standard scores 
are useful when n is large, but as n gets smaller you need another way to 


express a theoretical sampling distribution. 
OBJECTIVE 


Instead of the normal distribution, a student's t-distribution is better for 
working with small samples. The following program uses the t-distribution to 
explore the significance of the difference between two means for 
independent samples. 


ae P x7 : 2 er ee : 
Consider the z-ratio, z= —. for a sampling distribution where p is the 


population mean and 9, is the standard deviation of the sampling distribution 


Facts/ 
THEORY 


o 
(usually found as 0, = ene o is the population standard deviation). This 


ratio is normally distributed with a mean of 0 and unit standard deviation; 
however, in practice o is usually unknown and must be estimated from the 
data. This estimate of 0, is often referred to as s,. 


Let’s take a look now at another useful ratio, the t-ratio: 


The frequency distribution of t-ratios looks like a normal curve, except that 
the tails are thicker as they taper off to infinity. Actually, t-ratios represent 
not a single distribution but rather a family of distributions which change 
depending upon the number of degrees of freedom (df). The number of 
degrees of freedom is a very important concept in statistics. Generally, the 
number of degrees of freedom is the number of the variables which are free 
to vary. For example, if we have a sample that consists of the values 10, 11, 
12, 13, and 14, with a mean of 12, we have deviations from the mean of — 2, 
—1, 0, +1, and +2. The sum of these deviations is 0. Consequently, if you 
know any four of the deviations, you can find the fifth deviation; therefore, df 
_in this case is equal to 4. The df associated with sample variances is usually 
n—1, where n=the number of elements in the sample. For other statistics, 
however, df may be n—2, n—3, and so on. 
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As df gets large (approachesoo), the t-distribution approaches the normal 
distribution. 


Normal (df =Co) 


A very useful test involving t-scores is the test for finding the significance of 
the difference between two means for independent samples. The t-value 
(critical t or t.) is computed from the following formula: 

X, —X, 


n,si+n,.s3 /n, +n. 

n,+n,—-2\ nn. 
Let’s say we have gathered data from two classes in different schools. We 
want to know whether or not the level of achievement in one school is the 


same as in the other, so we'll compare the mean scores for the two classes. 
Our testing (or null) hypothesis is 


Hy:X, =X 


If the calculated t-value falls within a 95% confidence interval on the t-curve, 
we'll “fail to reject” the null hypothesis. We find our confidence interval by 
looking up the t-value for our degrees of freedom (in this situation, 


df =n, +n, — 2) at the selected level of certainty, 95%. (See the tables at the 
end of this chapter.) 


Since we are comparing two means for equality, there are two areas of 
rejection for H,, and we must use a two-tailed test. 


ee 
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OFF/ON [RN Clears calculator and enters 
learn mode. 
(2nd) MO CA) (Sto) 1 (RS) [Sto] 2 Stores n,, %, and s,. 
(R/S) [STO] 3 RA) 
(2nd) MO C8) (S10) 4 (R/S) (SO) 5 Stores nz, %, and s;. 
(R/S) [Sto] 6 
Co} Rel] 1 XX) Calculates critical t. 
3 4 
6?) 
aia 1 4 [) 
1 20) C0 0) CO ky 1 
40) | 1 
ia) 40) 0) &) 
CO 2 
(ee 500 &) 
Ge Rs) 
ee ea ag Sa 


df= 12 
Confidence Interval = 95% 


Area 3 


—2.179 0 2.179 t 


In other words, if our calculated t-value (t,) falls within Area 1 (— 2.179 to 
+2.179, for df= 12), we fail to reject H, and will assume that xX, =X. If the 
t-score falls in either Area 2 or Area 3, however, we reject Hy and assume 
that there is a significant difference in the levels of achievement in the two 
classes. 


If we had been working with the hypothesis x, >. in this example, then we 
would have had a directional test calling for a one-tailed test. 


The program listed below allows you to enter x, s, and n for two samples and 
then compute the critical t-value for your data. 


Program Keystrokes Purpose/Comments 


Note: Print command may be omitted if the PC-1OOA is not used. 


STATISTICS 4-21 


REGISTER 
ConTENTS 


UsING THE 
PROGRAM 


SAMPLE 
PROBLEM 
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Roo Ros De 
Ro: Nn, Ros Xe 
Ro = & Ros 
Ros R, 


Display/ Comments 


Clear memories and 
set decimal for desired 
accuracy. 


Enter data. 


Calculate t.. 


°This value is printed if the PC-100A is used. 


To evaluate performance on a standardized test, researchers in a school 
district found that a 12-.acmber class from school A had a mean score of 87 
with a standard deviation of 3.6, while a 14-member class at school B scored 
a mean of 85 with a standard deviation of 3.25. Is there a significant 
difference between the achievement levels of the two groups? (Use a 95% 
level of confidence.) 


Ho:X: =X, The null hypothesis is that there is no difference 
between the groups. 


Hy:x,#x, The alternative hypothesis is that there is a significant 
difference. 


ea ee ee ee ee eee ee 
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IDisTRIBUTION 


EFERENCES/ 
!FORMATION 


Enter program. 
Set decimal at 3 
places. 


Enter data for school 
A. 


12 (A) 
87 
3.6 
14 
85 
3.25 


n, 


xX) 


Sy 


Enter data for school 


B. 


Calculate t.. 


Looking up the table t-value for 24 degrees of freedom (12+ 14—2= 24) and 
a 95% level of certainty, we find that t= 2.064 and our confidence interval is 


t. = 1.43 


— 2.064 0 +2.064 
_—_—eeE 
fail to reject 


Since t. lies in the interval — 2.064 to 2.064, we cannot reject Hy. We 
conclude that there is no significant difference between the achievement 
levels of the two groups. 


The t-distribution and hypothesis testing are covered in most statistics 
textbooks. For example, see Wayne W. Daniel, Introductory Statistics with 
Applications (Boston: Houghton Mifflin Company, 1977), chapters 4 and 6. 
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OBJECTIVE 


Linear Regression and the 
Correlation Coefficient 


The main task of linear regression is to find a general mathematical 
relationship between two sets of variables, so that the value of one variable 
can be used to predict the other. Linear regression, as the name implies, 
assumes that the two variables are related linearly; that is, if the paired data 
(x, y;) are graphed, the points will fit (or nearly fit) a straight line. The 
correlation coefficient, then, reflects how well your data fit the line. 


Your calculator has built-in functions to perform linear regression analysis. 
These functions are incorporated into the program in this section, and a t-test 
is added to measure the reliability of the correlation coefficient. 


The calculator computes a least-squares linear regression with a line 
described as: 
y=mxt+b 
where m is the slope of the line and b is the y- intercept of the line. The 
correlation coefficient is computed as; 
M Sx 
Sy 
where s, is the standard deviation of the x-array of data and s, is the standard 
deviation of the y-array. 


r= 


Even when your data pairs (x,, y;) don’t form a perfectly straight line (and 
very few do), they may still be linearly related. 
y 


Ay, 


The Ay’s are errors from the best-fitting straight line (the regression line) and 
are called residuals. Your calculator computes the slope (m) and the y- 
intercept (b) of the line that minimizes 2(Ay)? for all of the (x,y) pairs entered. 


2xLy 
ee ON 
Dx) 
pao 
eer 
Zy —m=zx 
b= N 


4-24 STATISTIC 


MNEAR REGRESSION AND 
HE CORRELATION COEFFICIENT 


where N =the number of data pairs. Once the regression line is determined, 
you can predict the y value for any x or the x value for any y. 


The correlation coefficient is expressed as a value ranging from —1 to +1. 
A negative correlation coefficient indicates a negative relationship (as x 
increases, y decreases, or vice versa), and a positive coefficient indicates a 
positive relationship. The closer the value to — 1 or +1, the stronger the 
relationship is. A correlation coefficient near 0 suggests that no relationship 
or, at best, a random relationship exists. 


x 


r=+1 


The correlation coefficient, r, is based on sample data and is an estimate of 
the true population coefficient p. Like other statistics, r can be affected by 
sampling variations but tends to approach normal distribution as sample size 
increases. This fact allows you to test r by the same methods used for other 
statistics. When N<30, the t-test is commonly used: 


with N —2 degrees of freedom 


The t-ratio can be used to prove or disprove (within the confidence limits you 
select) the null hypothesis, H,:e =0 (that is, that the population correlation 
coefficient is equal to 0). 


pet ne en el ns Sy RR oe 
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The program listed below computes the regression line for your data and 
calculates r, m, b, and the t-ratio. 


| Step # | Program Keystrokes 


Purpose/Comments 


OFF/ON [RN Clears calculator and enters 
learn mode. 

WON LA) [z:t) (R/S) [2nd] Enters x and y data. 

(A) 

WOE 88) (2nd) MH 13 (Sto) 7 Calculates correlation 

coefficient, r. 

OE (2c) MG (2nd) ME 12 RS) | Optional: calculates y- 

[z:t] intercept (b) and slope (m). 
fo22 | WE Cc) 2nd) EE 14 RS Calculates y for x value. 
er (D) (nd) MEM 15 RS Computes x for y value. 

MC) ko) 3G 2 ES) Calculates t-ratio. 


Lt | 
Oi ky 720 
=) CO ke) 7 &) SO 8 


i fu) 


| 
al 


Exits learn mode. 


REGISTER Roo Ro; 1 
CONTENTS Ro: -Ros Used for Ros. t 
summation 
of x, y data 


rag 


111222333 3} -,<élelteied 


p15 5556667777 
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Usinc THE 
PROGRAM 


SAMPLE 
PROBLEM 


Clear memories and 

set decimal for desired Gn 

accuracy. 

Enter x, y data. x, AI y: . The calculator 
counts your 
paired-data 
entries. 

X2 y2 . (Disregard 
number in 

X; Ys . display after x, 

nor entries.) 

Continue until all 

data pairs are entered. | x, Yn 

Calculate correlation 

coefficient, r. 

If desired, calculate 8 | 

y-intercept and slope 

of the line. 


To calculate y for x 
value, enter x. 


To calculate x for y 
value, enter y. 


Calculate t-score. 


1. The QZ Company, a manufacturer of small parts requiring hand assembly, 
is looking for a way to predict how well prospective employees will work out 
on its assembly line. The personnel director of the company finds a widely 
used test for measuring manual dexterity and hand-to-eye coordination and 
administers the test to 10 new assembly-line employees. Then he checks on 
their daily unit output at the end of three months and collects the following 
data: 


STATISTICS 4-27 


4 


LINEAR REGRESSION AND 
THE CORRELATION COEFFICIENT 


EMPLOYEE 


James 
Doris 
Julia 
Robert 
Amy 
Max 
Carl 
Jane 
Louis 
Richard 


TEST SCORE 


(x) 


DAILY OUTPUT 
(in 100 units) 


(y) 


o 
aS 


GINS CW ft 
HKHARaIUUO 


ad 
ro) 


Does there seem to be a correlation between scores on the test and daily 
output at the end of three months? If so, what should the test cut-off score be 
if the company wants its employees to be producing at least 260 units a day 
at the end of three months? In general, what daily output can the company 
expect (at the end of three months) from employees who score 8.5 on the 


test? 


Enter program. 


accuracy. 


Enter (x,y) data, 
James 
Doris 
Julia 
Robert 
Amy 
Max 
Carl 
Jane 
Louis 
Richard 

Calculate r. 


Procedure 


Set decimal for desired i 2 


8 (A) 3.4 RS 
7.5 RS 29 RA 
9 RS) 3.5 RS 
5.5 RS 2.5 RS 
6 RS 2.7 RA 
4 BS) 26 RS 
9.5 RS) 3.6 RS 
4.5 BS) 2.6 RS 
8.5 RS 3.1 RS 
5 RS) 3 RA 


Display/Comments 


We'll use 2-place 
decimal. 


Note that, after 
subroutine [A] 
has been 
initialized for first 
x entry, all other 
data is entered by 
pressing (4). 


Correlation 
coefficient. 
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Calculate score that A 4.52 Score (predicted 
would indicate output x value for 
of 260 units daily y =2.6). 


(260 + 100 = 2.6). 


Calculate predicted é 3.30 Output (y where 
output for persons x= 8.5). 
scoring 8.5 on test. 


Since the correlation coefficient is 0.87, the personnel director feels there is a 
pretty good relationship between the test score and the unit output at the 
end of 3 months. The regression analysis also indicates that prospective 
employees should score at least 4.5 on the test if the daily output at the end 
of 3 months is expected to be 260 units, and that those who score 8.5 on the 
test will generally be able to achieve an output of about 330 units a day at 
the end of the training period. 


Realizing that he has a pretty small sample here, the director plans to 
continue his testing program and compile further data. If the relationship 
holds, he should be able to develop some efficient hiring guidelines. 


2. For students taking a basic statistics course, the instructor has compiled the 
following data: 


Student IQ Final Exam Grade 
1 120 87 
2 131 91 
3 112 85 
4 135 93 
5 111 73 
6 118 82 
7 122 85 
8 125 89 
9 108 74 

10 127 88 


The instructor wants to know if there is a correlation between students’ IQ’s 
and final exam scores in his class. To answer his question, find r and then 
perform the t-test using a 95% level of certainty. 
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INFORMATION 
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Display/Comments 


in| 


Calculate t-score. 5.55. t-score. 


Clear memories and 0.00 
display. 
Enter data. 120 [A) 87 1.00 
131 91 2.00 
112 RS §5 3.00 
135 IRS) 93 [R/S 4.00 
lll RS) 73 5.00 
118 (RA) 82 6.00 
122 RAS) 85 7.00 1 
125 89 8.00 | 
108 RS) 74 9.00 
127 RA) 88 10.00 
Calculate r. (3) 0.89 Correlation 
coefficient. | 
| 


There appears to be a good positive relationship. Now that you have your t- 
score, you want to test two possibilities: 


H,:p =0 
H,:p #0 


Thus, this is a two-tailed test. By consulting a table of t-scores (see the tables 
at the end of this chapter), you find that the range of t-scores for a 95% level 
of certainty with 8 degrees of freedom is + 2.306. Therefore, if your t-score 
falls within this range (— 2.306 to +2.306), you accept the null hypothesis — 
that is, you are 95% sure that your correlation coefficient of 0.89 has been 
affected by sampling variations, and there is really not much correlation 
between IQ and final exam grades. Since your t-score is not in this range, 
however, you reject the null hypothesis and are 95% sure that r 

approximates p correctly. 


Wayne W. Daniel, Introductory Statistics with Applications (Boston: 
Houghton Mifflin Company, 1977), chapter 9. 

Robert D. Mason, Statistical Techniques in Business and Economics, 3rd ed. 
(Homewood, Illinois: Richard D. Irwin, Inc., 1974), chapter 18. 
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One of the most useful and powerful tools in statistics is the analysis of 
variance (ANOVA). Generally ANOVA is a model which divides observed 
variation of data into different parts. You can then assess the magnitude of the 
variation and use an F-test to help you decide if the variation is greater than 
Osjective | expected under the null hypothesis. The ANOVA model can be used to 
compare two or more processes, concepts, products, results, or means. 


The following program will generate an F-value for a one-way analysis of 
variance. 

There are two variations which need to be considered, the variances between 
the groups (MS,) and the variances within the groups (MS,,). The observed 
F-value (F,) is found as follows: 


—— : _ MS, 
Facts/ r= MS. 


THEORY 


. sh” N N, 
MS, = Ko1 
: » [2x , @x)? ol 
= eI >> Ya ke 
Dx?+2x2+... 2x? [ N, + N, + N, 
MS, = N.-K 
Where N, = _ the total number of observations, 
N, = the number of observations in each group, and 
K = the number of groups. 


Once you've found F, you need to compare this value with a critical F-value 
(F.) found in a table of F-values (see the F-table at the end of this chapter). 
The number of degrees of freedom (df) for MS, (the numerator) is K-1, and df 
for MS, (the denominator) is N, — K. To use the table, find df for the 
numerator, and then come down the column until you reach df for the 


denominator. 
The following comparison can then be made: 
— 


— 
failtorejectH, F. reject Ho 


If F, is to the left of F., you have failed to reject Hp. If F, is to the right of F,, 
you reject Hy. 
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Clear memories and 
display. 


Display/Comments 
0.00 


é] 
il 
| 


Enter data. 120 (A) 87 1.00 

131 RS) 91 RA 2.00 

112 RS) 85 3.00 

135 RA) 93 4.00 

lll RS) 73 RAS 5.00 

118 RA) §2 [RA 6.00 

122 (R/S) 85 7.00 

125 RS) 89 8.00 

108 74 RS 9.00 

127 10.00 
Calculate r. 0.89 Correlation 
coefficient. 


el 


Calculate t-score. 5.55. t-score. 


There appears to be a good positive relationship. Now that you have your t- 
score, you want to test two possibilities: 


H,:p =0 
H,:p 40 


Thus, this is a two-tailed test. By consulting a table of t-scores (see the tables 
at the end of this chapter), you find that the range of t-scores for a 95% level 
of certainty with 8 degrees of freedom is + 2.306. Therefore, if your t-score 
falls within this range (— 2.306 to +2.306), you accept the null hypothesis — 
that is, you are 95% sure that your correlation coefficient of 0.89 has been 
affected by sampling variations, and there is really not much correlation 
between IQ and final exam grades. Since your t-score is not in this range, 
however, you reject the null hypothesis and are 95% sure that r 

approximates p correctly. 


Wayne W. Daniel, Introductory Statistics with Applications (Boston: 
Houghton Mifflin Company, 1977), chapter 9. 


Robert D. Mason, Statistical Techniques in Business and Economics, 3rd ed. 
(Homewood, Illinois: Richard D. Irwin, Inc., 1974), chapter 18. 
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One of the most useful and powerful tools in statistics is the analysis of 
variance (ANOVA). Generally ANOVA is a model which divides observed 
variation of data into different parts. You can then assess the magnitude of the 
variation and use an F-test to help you decide if the variation is greater than 
Osjective | expected under the null hypothesis. The ANOVA model can be used to 
compare two or more processes, concepts, products, results, or means. 


The following program will generate an F-value for a one-way analysis of 
variance. 


There are two variations which need to be considered, the variances between 
the groups (MS,) and the variances within the groups (MS,). The observed 
F-value (F,) is found as follows: 


M 
Facts/ F,= 1S, 
THEORY MS, 
(x)? | (2x.)? (2xq)? _ (2x)? 
N, + N, eciece a WN. 
a Pra: <— aie at oi 
, x? a(x.) (2x,)? | 
2 ios oe peesieete —— 
ie Dx?+2Dx3 +... 2x2 ie + N +...4+ N, 
a N.-K 
Where N, = _ the total number of observations, 
N, = the number of observations in each group, and 
K = the number of groups. 


Once you've found F, you need to compare this value with a critical F-value 
(F.) found in a table of F-values (see the F-table at the end of this chapter). 
The number of degrees of freedom (df) for MS, (the numerator) is K-1, and df 
for MS,, (the denominator) is N, — K. To use the table, find df for the 
numerator, and then come down the column until you reach df for the 
denominator. 


The following comparison can then be made: 


aa Sf 


———_— —_—— = 
fail to rejectH, F. reject Ho 


If F, is to the left of F., you have failed to reject Hp. If F, is to the right of F,, 
you reject Hy. 
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| Step # | Program Keystrokes 


eee OFF/ON EN) 


Purpose/Comments 


Clears calculator and enters 
learn mode. 


Stores number of observations 
in group (N,) and counts 
groups. 


Enters x, data for group and 
checks to see if all x, data 
have been entered. If not, 
returns to BM to enter next 
x,. If all x,’s have been 
entered for group, goes on 


x : 
to calculate 2x,, (ae - , 2Ni, 
1 


and =x’, and then clears R, 
through R, for next group's 
entry. 


Calculates MS,. 


Calculates MS,. 


Calculates F,. 


5 [ind] 
(nd) MO) RC 4 CS) 5 
=) Gd OE we 

Niel ake 


| exits learn mode. 


Note: Print commands may be omitted if the PC-100A is not used. 


Initializes by clearing 
display and memories. 


Roo Group Counter (K) Ro: N, Ris MS, 
Ro Ros Ris MS, 
Roe Used for Roy Rig 
Ros statistics Ry Dx Ry; 
Ros entries Ru =x} Ris 
Ros Riz =N, Rio 
Ros ae Reo 
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0. Clears memories 
and display. 


Set decimal for desired 
accuracy. 
Enter data for first group. 
Number of 

observations 


N, 
1. Data entries 
2. counted. 


n 


When all observations 
for this group have 
been entered, be sure 
to press so that 
future computations 
can be made. 


0. Computes and 
sums data for 
calculation of 

MS, and MS,. 


Enter data for next group. 


Compile data from 
second group. 
Repeat these steps for 
each group of data. 
Na 

X 
Xz 


Xn 


Compute MS,. 
Compute MS,. 
Compute F,. 


°This value is printed if the PC-100A is used. 
STATISTICS 4-33 


SAMPLE 
PROBLEM 
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A food company was testing four package designs for a new product. Fifteen 
stores were selected, and each store was randomly assigned one of the 
package designs. Other relevant conditions, such as location and number of 
packages on the shelf, price, and promotional efforts, were kept the same for 
all the stores. The sales during the study period were: 


Package Designs 


rs 2 is 4 
13 15 20 29, 
iby 1] 18 30 
15 14 22 19 

16 17 
18 


Is there a difference in the average sales for the four package designs? 


The null hypothesis is 
H): There is no difference in average sales for the four designs. 


Our number of degrees of freedom for MS, is 3 (K— 1=4—1=3), and df for 
MS,, is 11 (N, -K=15—4=11). Looking in the F-table, we find the F-value 
for our degrees of freedom is 3.59 at a 95% level of confidence. Now, we 
calculate F,. 


Enter program. 

Set two-place decimal. 0.00 

Enter data for first 

design. 
N,=3 3.00 
x, =13 1.00 
%2=17 2.00 
x,;=15 

Compile data for 


calculation of MS, and 
MS,. 
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REFERENCES / 
INFORMATION 


Procedure 

Enter data for second 

design. 
N.=5 5.00 
x,=15 1.00 
x, =11 2.00 
X= 14 3.00 
x, =16 4.00 
XxX, = 18 5.00 

Compile data. 0.00 

Enter data for third 

design. 
N, =+4 4.00 
x, = 20 1.00 
x,=18 2.00 
x, = 22 3.00 
=H 17 4.00 

Compile data. 0.00 

Enter data for fourth 

design. 
N, =: 3 I 3.00 
x =122) 22 1.00 

‘ 30 
19 

Compile data. 

Compute MS,. Cs) 

Compute MS,. Cc) 

Compute F,. (o) 


Now we can make our decision: 


fail to reject Ho reject H, 
F, =5.78 
F. =3.59 
Since 5.78 >:3.59, we must reject H, and assume that there is a significant 
difference in average sales. 


Robert D. Mason, Statistical Techniques in Business and Economics, 3rd ed. 
(Homewood, Illinois: Richard D. Irwin, Inc., 1974), pp. 362-366. 
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t values for one-tailed test (For checking only an upper or a lower limit) 


+ Level of Certainty —-——————_ 


1 
2 
3 
4 
5 
6 
7 
8 
9 
10 
1] 1.796 
12 1.782 3.055 
13 1.771 3.012 
= ia 1.761 2.977 
3 15 1.753 2.947 
& 16 1.746 2.921 
ie Ty 1.740 2,898 
$ 18 1.734 2.878 
& 19 1.729 2.861 
A 20 1.725 2.845 
21 1.721 2.831 
22 L717 2.819 
23 1.714 2.807 
24 L711 2.797 
25 1.708 2.787 
26 1.706 2,779 
27 1.703 2.771 
28 1.701 2.763 
29 1.699 2,756 
30 1.697 2.750 
40 1.684 2.704 
60 1.671 2.660 
120 1.658 
) 1.645 
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Table B 


t values for two-tailed test (For checking both upper and lower limits) 


Degrees of Freedom 
— 
x 
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Pi 


Values of F for 95% Level of Certainty 
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Ancient Greek and Chinese philosophers theorized about the relationship of 
mathematics to music. According to Plato: 


It was music that brought order and control into human experiences 
in the evolution of the race and in this way prepared for the 
functioning of the rational faculty. 


However, musicians had to wait until the middle of the twentieth century for 
computer technology to develop and assist them with the mathematical 


-aspects of music. 


About 1948, digital computers and other electronic data-processing machines 
were used for research in musicology, such as Bertrand Bronson’s folksong 
research, and in music education. Experiments in musical composition with 
the aid of a computer began in 1955-56 with the ILLIAC automatic high-speed 
digital computer at the University of Illinois. In 1957 Lejaren Hiller and 
Leonard Isaacson used the ILLIAC computer to compose Illiac Suite for String 
Quartet, the first “computer composition.” 


David H. Cope in New Directions in Music divided composer use of the 
computer into five categories: 


1. computer-composed music in terms of “human-imposed 
parameters” (computer selection from programmed styles); 


2. computer-generated sound wherein the composer probably has 
the most control over his materials; 


3. computer aid for random or probability theory constructs; 
4. direct control of synthesizer functions by the computer; 


5. visual (CRT) notation for direct analog output.’ 


Computer composition involved programming the basic material and 
stylistic parameters for the composition. Illiac Suite for String Quartet was 
composed in this way, and even though such compositions have not been 
artistically successful, they have attracted attention to the possibilities of the 
computer, 


In 1959 Max Matthews and James Tenney from Bell Telephone Laboratories 
collaborated with J. K. Randall and Hubert Howe from Princeton to produce 
the first computer program for generation of sound, MUSIC IVB. This 
technique allowed the composer almost complete control over the composition. 


‘David H. Cope, New Directions in Music, 2nd ed. (Dubuque, Iowa: Wm. C. 
Brown Company Publishers, 1976), p. 100. 
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Computer aid in compositions based on random or probability theory 
constructs was used by Iannis Xenakis to produce ST/10-1, 080262 in 1962. 
The computer did not actually compose this music, but only aided the 
composer with high-speed computations; however, research in the field of 
computer control of synthesizer functions has produced several machines 
that can be used by the composer. The Synthi 100’s Digital Sequencer 256 
(E.M.S.) can store 10,240 items capable of controlling six different 
parameters simultaneously over a sequence of 256 events. The Sal-Mar 
Construction made by Salvatore Martirano is semiportable and capable of 
producing live performances of computer-synthesizer music. 


Developments in computer technology have a continuing effect on computer 
music. Because of the computer’s high-speed capacity and accuracy, it has 
extended the physical limits of composer and performer alike. Music that 
would have been extremely tedious for the composer to create can now be 
accomplished in a relatively short time. The range of performance has been 
greatly extended by the control and accuracy of the computer. Errors in 
performance are virtually nonexistent in some areas of computer music. Also, 
sounds that were unavailable with traditional instruments can be produced 


by pushing a button. 


The extended programming, memory, and printing capabilities of 
programmable calculators have brought many aspects of computer music 
into the range of the hand-held calculator. The remainder of this chapter will 
show how your calculator can be used in music theory for learning music 
intervals, analysis of music, and composition. 
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An interval is the distance in pitch between two notes. In analyzing 
intervals, two items need to be determined: quality (major, minor, 
augmented, diminished, and perfect) and quantity (first, second, third, fourth, 
fifth, sixth, seventh, etc.). The program included here analyzes the intervals 
between tonic and the other notes of the scale and identifies the quantity 
(from first through seventh) of the interval. 


In major keys the intervals between tonic and the other degrees of the scale 
have the following qualities and quantities: 


Facts/ 


THEORY 


unison major 
or 2nd 
perfect 
Ist 


perfect perfect major major octave 
4th Sth 6th 7th or 
perfect 
8th 


Quantities in minor keys are the same as in the parallel major key, but the 


qualities are sometimes different. 


unison major 
or 2nd 
perfect 
Ist 


perfect perfect minor minor octave 


4th 5th 6th 7th or 
gl Lek perfect 
{ 8th 
0), 2at ic 
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Although this program does not involve the qualities of intervals, you should 
keep in mind that quality plays an important part in the analysis of intervals, 
In general the patterns for identifying quality are: 


1, a major interval decreased by a semitone is minor. 


a minor interval decreased by a semitone is diminished. 


2 
3. a major interval increased by a semitone is augmented. 
4 


a perfect interval decreased by a semitone is diminished. 


ow 


a perfect interval increased by a semitone is augmented. 


The following program identifies the intervals one through seven, operating 
on the notes A, B, C, D, E, F, and G. It uses a system of numerical codes to 
identify the quantity of an interval, based on the tonic code stored in 
memory | and the numerical value of the second note in the interval. The 


tonic codes are: 


C=] = 5 
D= 2 A=6 
E=3 B= 7 
F=4 


For convenience in entering the second note in the interval, each note of the 
scale is identified with a user-defined label, so that you 


enter A by pressing [4], 

enter B_ by pressing ; 

enter C by pressing [CJ], 

enter D by pressing (2), 

enter E by pressing LE), 

enter F by pressing Mand 
enter G by pressing a. 
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Step # Program Keystrokes Purpose/Comments 
OFF/ON Clears calculator and enters 
learn mode. 
000 Wm (cj 1 2 Stores numerical value of C. 
(2nd) 
006 WH (0) 2 2 Stores numerical value of D. 
(2nd) 2 
012 Me CE) 3 2 Stores numerical value of E. 
(2nd) SO 
018 (2nd) HOH (2nd) BO 4 2 Stores numerical value of F. 
|B 
024 | tbl} Ml 5 2 Stores numerical value of G. 
(2nd) BG 
oa (2nd) HH CA) 6 2 Stores numerical value of A. 
8 
036 (2nd) MH (8) 7 02 Stores numerical value of B. 
041 Ut] HG (Rel) } Tests second note against tonic. 
(xt) 2 (INV) | >t If numerical value of second 
Ww (Rc) 2 (=) Re 1 1 | note is less than the numerical 
=) L Pit] value of tonic, transfers to [2nd] 


HW. If numerical value of 

second note is more than value 
of tonic, calculates the quantity 
of the interval. 


061 Calculates quantity of the 
interval if numerical value of 
the second note is less than the 


numerical value of tonic. 


ieee 9 Exits learn mode. 


Note: Print commands may be omitted if the PC-1O0A is not used. 


Roo 
Ro; tonic value 
Roz value of second note 
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Procedure 


Display /Comments 


Enter tonic code in 
memory 1. 


Press user-defined 
label key assigned 
to second note. 
quantity ° 
°This value is printed if the PC-100A is used. 


Identify the following intervals: 


<== iene 


Display /Comments 


Enter program. 0 , 
1 Riek 

C is tonic, so enter ] in 

memory 1. 1. Tonic code. 

Enter second note, E. 3. The interval is a 


third. 


2. 
Since the value of C 
is already stored, 
enter only the second 
note, G. 


Bs 
Enter numerical code 
for tonic, F. 


5. Interval is a fifth. 


4. Tonic code. 
Enter second note, B. 


4, 
Enter second note, E. 


4, Interval is a fourth. | 


Interval is a seventh. 
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[| 1 
|1. Rewrite the program to calculate lower intervals; that is, intervals leading 
' down from a note, rather than upward. 
|| 2. Write a program to identify the quality, as well as quantity, of intervals. 
3. Rewrite the program to calculate inversions; that is, intervals that are 


FURTHER inverted from top to bottom. 
XPLORATIONS 


REFERENCES/ For additional information about intervals, see: 


INFORMATION ane , : . . 
William Christ, Richard DeLone, Vernon Kliewer, Lewis Rowell, and 


William Thomson, Materials and Structure of Music I (Englewood Cliffs, 
N.J.: Prentice-Hall, Inc., 1966). 


Tom Manoff, The Music Kit (New York: W. W. Norton, 1976). 


Allen Winold and John Rehm, Introduction to Music Theory (Englewood 
Cliffs, N.J.: Prentice-Hall, Inc., 1971). 
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Chord Identification 


A chord consists of three or more notes sounding at the same time, and this 
combination of tones is called harmony. In a piece of music each chord has a 
specific function, determined by the key in which the music is written. 
Identifying chords plays an important role in harmonic analysis and in 
transposing music from one key to another. 


The program in this section analyzes a three-note chord (triad) and identifies 
it as a one, two, three, four, five, six, or seven chord. (These are often 
indicated with Roman numerals J, II, III, IV, V, VI, and VII.) Note that the 
program automatically transposes the notes of the chord to root position 
before totaling the scale degrees of the notes to find the chord number. 


In the key of C, chords built on each scale degree are: 


5 

—— & 
ei a> © 

— =: 


Like intervals, chords are also labeled as major, minor, augmented, or 
diminished. The rules for identifying these qualities may vary from one music 
theory department to another. Be sure to keep in mind the rules established 
by your school when analyzing chords. Also, be alert for suspension, pedal 
points, and passing tones. Another point to keep in mind is that a four-note 
chord is probably one of the basic chords with a seventh added. (Note that if 
one of the four notes is an octave repeat of one of the other notes in the 
chord, it is not a four-note chord.) 


As in the section on Intervals, the program for identifying chords uses a 
numerical code system and operates on the notes A, B, C, D, E, F, andG. You'll 
first enter the number code for the key in which the music is written, and 
these codes are: 


E=3 G= B=7 
F=4 


= 5 
=6 


See 
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Then enter the three notes of the chord by pressing the user-defined label key 
assigned to each note. That is, you enter 


A by pressing [4], 

B by pressing (8), 

C by pressing LC), 

D by pressing (2), 

E by pressing LE), 

F by pressing Ml and/or 
G by pressing a. 


Once your data is entered, you are ready to calculate the number value of 
the chord, one through seven. Note: The program will not correctly identify 
chords other than these seven. 


Program Keystrokes Purpose/Comments 


OFF/ON Clears calculator and enters 
learn mode. 


THE 


PROGRAM 


(2nd) MOH [2m] ME (2nc) ME [Sto] J] 
[:t] [CLR] [R/S] 


Clears memories and stores 
key code in memory | and 
t register. 


WH (4) 6 Ee [Ee] Enters Aand tests against key 
code. If value of A= key 
value, transfers to subroutine 


If less, continues to ad] : 
024 
027 


where A is transposed 
and summed to 
memory 2. 


Enters value of B(since 7 is 
largest note value, it does not 
have to be tested against key 
value). Then goes on to 
transpose note value 
and sums to memory 2. 
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038 


(2nd) MON CC) | (nd) BM (EE) (2nd) 
Ee 


pa ot ee ae 
Pr] 


eee 
Pr] 


(2nd) MON (2nd) MG 4 (2nd) EEN (EE) 
(2nd) BG 


| Step = | Program Keystrokes Purpose/Comments 


Enters and tests value of C, 
transferring to proper 
subroutine for transposition 
and summation. 


Enters and tests value of D, 


Enters and tests value of E. 


Enters and tests value of F, 


MM 5 (nc) ESN (EE) 


OM [Rel] 2 [z:t] 9 


Enters and tests value of G. 


Tests chord value for 
identification. Note that (22) , 
(Y=) | (=), (nz) | (CE) | and GA 
are used here as subroutine 
labels. Identifies chord as a 
three if all tests default. 


A one chord. 


A six chord. 


A four chord. 
A two chord. 
A seven chord. 
A five chord. 


Displays chord value and 
stops. Then clears memories 
and restores key code in 
memory 1 for next chord 
evaluation. 


Note: Print command may be omitted if the PC-100A is not used. 
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REGISTER Roo 
ConTENTS Ry, key code 
R,2 chord value 


code (2né) ll 0 


CA) or (2) or or | The transposed value of 
(©) or CE) or 2nd) MGM | the note will appear in 
or EE) the display after the 
appropriate label key is 
pushed. 


Procedure 


Enter key code. 


NG THE 
OGRAM 


Us 
Pr 


Enter each note in 
chord, one at a time. 


(2nd) 


chord value® 
0 


Calculate chord value. 
Prepare for next chord. 


*This value is printed if the PC-100A is used. 


Analyze the marked chords in this excerpt from Bach’s Jesu, Meine Freude. 
The key is E minor. 


SAMPLE ] 2 3 4 5 6 7 
PROBLEM CN 


S— 
Je - su, mei. - ne Freu - de, 
ach, wie eX ach a ge 
re 
ts ae et ee te 
y 7 
Ww 
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FuRTHER 
IX XPLORATIONS 
REFERENCES/ 
INFORMATION 


Cuorp IDENTIFICATION 


Display /Comments 


| 
Enter program. 0 | 
Enter key code, 3. 3 Lk 0 | 
Enter notes of first CE) il | 
chord. 3. 

5. 
Calculate chord value. 1. Aone chord. 
Prepare for next chord. 0 
Enter notes of second 
chord. Co) (5) | O° | oh 
Calculate chord value. | 2.4) HG 5. A five chord. 
Prepare for next chord. 0 


Continue in this way until all the chords have been analyzed. 


The chords will be: 


Chord 1 = one Chord 4 = one Chord 7 = one 
Chord 2 = five Chord 5 = two 
Chord 3 = four Chord 6 = five 


Analyze the chord structures of a piece of music and use the information 
generated by the program to transpose the music into another key. 


For further information about harmonic analysis, see: 


Charles Burkhart, Anthology for Music Analysis (New York: Holt, Rinehart 
and Winston, 1965). 


Arthur Frackenpohl, Harmonization at the Piano (Dubuque, Iowa: Wm. C. 
Brown Company Publishers, 1969). 


William Thomson, Introduction to Music as Structure (Reading, Mass.: 
Addison-Wesley Publishing Company, 1971). 


Allen Winold and John Rehm, Introduction to Music Theory (Englewood 
Cliffs, N.J.: Prentice-Hall, Inc., 1971). 
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Melodic Contours 


Facts/ 
THEORY 


Sight-singing is a sophisticated and valuable skill developed by extensive 
practice, and melodic contours are a form of music analysis useful in 
determining how a melody will sound by looking at the notes on the staff. 


The following program will generate random notes for practice in sight- 
singing and, if the PC-100A is used, will print a melodic contour of the notes 
generated, 


The “‘fixed do”’ system assigns do to 1 or tonic of each key. (“Moveable do” 
assigns do to the note C. For example, in the key of C major (which we use in 
this section) C=1, D=2, E=3, F=4, G=5, A=6, and B=7. 


The music staff is made of five horizontal parallel lines, and the pitch of any 
note is determined by its location on the lines or spaces between the lines of 
the staff. The names of the various lines and spaces are assigned by the clef 


sign on the left side of the staff. The treble clef, , or G-clef assigns the 
note G above middle C to the second line from the*’ bottom of the staff. All 
other pitches are relative to the G. Base clef, ee , or F-clef assigns the note F 
below middle C to the second line from the top of the staff. All other pitches 
are relative to the F. Alto clef, [2 , a C-clef, assigns middle C to the middle 
line to the staff. Tenor clef, , another C-clef, assigns middle C to the fourth 


line from the bottom of the staff. 


Practice singing the following patterns first by singing the intervals in each 
measure of the music. Eventually the pattern will be so well established that 
you will be able to sing the entire melody easily. 


I} 82 oh 7 1 wed 1 45.3 I 16 oso ern 
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SIGHT-SINGING AND 
MeELopic CoNnTOURS 


In the following program the first twenty-one steps utilize the Master 
Library random number generator (ML-15) to create a series of numbers 
corresponding to notes. As mentioned, we have used the scale of C major 
with note values of l1=C, 2=D, 3=E, 4=F,5=G, 6=A, and 7=B. The 
program can easily be expanded to create a larger range of notes simply by 
raising the upper limit (see program step 012). 


The remainder of the program is designed to be used with the PC-100A to 
print the letter name of the note in its relative position on the tape, thus 
forming a melodic contour. Read it by tearing the paper from the PC-100A 
and turning it so that the first notes printed are on the left. By cutting the 
contour into sections corresponding to musical phrases, each section of the 
music can be analyzed separately. Again, the program can be adapted 
beyond the seven-note range simply by adding additional printing 
subroutines and rearranging the printing subroutine calls in the program. 


You can use the program in three ways. First, it creates a random melody 
that offers practice in sight-singing. Next, the program will print the melodic 
contour of these randomly generated notes for analysis. And finally, you can 
control the printing of a melodic contour by entering the number of any note 
and then pressing CEJ. This procedure allows you to print out a melody you 
create or to print a melodic contour for pre-written melodies (within the 
selected range of notes). 


Purpose/Comments 


Clears calculator and enters 
learn mode. 


[AJ 15 LE) Selects program ML-15 and 


inputs seed number. 


(2nd) HEM (R75) 


(Note: If the PC-100A printer is not used, the remaining program steps are 
unnecessary. The remainder of the program prints a melodic contour of the 
notes generated above or of the notes you input.) 


Inputs lower limit. 


Inputs upper limit. 


Generates random number. 
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Purpose/Comments 


Enters generated note value in 
t register; then tests for value 

(C=1, D=2, E=3, F=4,G=5 

A=6, and B=7). When x=t, 
program goes to print routine 

and prints name of note in 
relative scale position. 


Print codes for A. 


Print codes for B. 


Print codes for C. 


(2nd) MEH (2nd) Print codes for D. 
16000000 


(2nd) 
1700 


21000000 


140 (2nd) ME CE | (2nd) MEH 00 220000 | Print codes for G. 
WH 3 (cro) (Ee) 

154 (2nd) WOM (Ee) (2nd) MO 5 Print command subroutine. 
[R/S] 


Exits learn mode. 
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MELopIc CONTOURS 


REGISTER Roo Ros 
ConTENTS Ro: Used Ros 
Ro2 Used Ro: 
Ros Used Ros 
Ros Used Ros 


Procedure 


Data Entry: 
1. Enter seed number 
(OSseed= 199017). 
2. Enter lower limit (x). 
3. Enter upper limit 
(x +n). 
Generate random 
number (note value). 


UsING THE 
PROGRAM 


Print note.° 


Rio 
Ru 


Lower Limit 
Upper Limit 


Display /Comments 


seed 


x 
(x +n) 


note value 


Prints letter name of note in its 
|_relative position. 


Continue to press [8] to generate new notes (if the PC-100A is used, press 
C€] after each note value appears in the display to print melodic contour). 


Music THEORY 


SilGHT-SINGING AND C= 


AWlELopIc CONTOURS 


Example 1: Using a seed number of 1234, generate an 8-note melody with a 
range of middle C to B. 


SAMPLE 
PROBLEM 


Enter program. 
Enter seed number. 
Enter limits: 


Lower limit (middle c) 


Upper limit = 1+ 7(b). 


Generate random 
number (note value). 


| 
Ae 


(D) 


Print note.°® 16000000. (D print code) 
4. (F) 


2100000000. (F print code) 


(Press to generate 
each new note, and 
press CC] to print it, 
if the PC-100A is used.) 


Ae eI 


1. (C) 

15. (C print code) 

4, 
2100000000. 
. (A) 
13. (A print code) 
G print code) 
C 


) 
(C) 


( 
( 
(G 
( 
( 


FERRER EEE OE 


°Omit this step if the PC-100A is not used. 
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SIGHT-SINGING AND 
MELopic Contours 


In the key of C major the melody is: 


The PC-100A print-out will look like this: | 


Turning the tape so that the beginning note is on your left, you can analyze 
the melodic contour. 
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IGHT-SINGING AND C= 


=MfELopIC CONTOURS 


Example 2: Print the following melodic contour and identify this famous melody: 
1, 1, 5, 5, 6, 6, 5, 4, 4, 3, 3, 2, 2, 1. 


15. 


1 (c) 
1 [c) 
5 (cl 
5 [c] 
6 [c) 
6 [c] 
5 (c) 
4 [c] 
4 [ce] 
3 [c] 
3 [ec] 
2 [ce] 
2 [ce] 
1 [cj 


Generate a 20-note melody with a range of 10 notes (A below middle C to C 
above middle C) and print the melodic contour. Use the following note values: 


FuRTHER 
EXPLORATIONS 


—p 2 
@ 0 


1234567 8 9 10 


Rererences/ Paul Hindemith, Elementary Training for Musicians (New York: Associated 
InForMATION Music Publishers, Inc., 1949). 


George A. Wedge, Advanced Ear-Training and Sight-Singing (New York: G. 
Schirmer, Inc., 1922). 


Master Library, pp. 52-54. 
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Facts/ 
THEORY 


Composition 


The program used in the section on sight-singing and melodic contours is 
actually a form of composition — the creation of a melody line. The first 
twenty-one steps of that program (the random-number-generating portion) 
can also be used to create entire compositions — melody and harmony — 
when certain harmonizing techniques are applied. 


Since the program and instructions for using it are given in the section on 
sight-singing and melodic contours, we won't repeat these here. Instead, 

we'll discuss certain scales and techniques used in compositions and give 

examples as we go along. 


Note: If you are using the PC-100A printer, you may wish to insert a print 
command ( HB ) just before in the program. 


WHOLE-TONE SCALE 


Possibly the easiest scale to use in composition is the whole-tone scale 
because it has no half-tone dissonances. Therefore, the random number 
generator can be used to compose melodies and harmonies without fear of 
unpleasant sounds. 


oS 
12 3 4 5 6 or L..2, (344-0 6 


Once a series of notes on this scale has been generated by the program, you 
can create a composition by making each note a half note for melody and 
using the same series in quarter notes (diminution) repeated twice for 
harmony. Unfortunately, whole-tone compositions tend to be a bit boring, 
but the practice in composition is worthwhile. 
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3COMPOSITION ai ~ 


Using a lower limit of 1 and an upper limit of 7 (1 +6), the program 
produced this series of notes: 


1=C, 3=E,5=G=,3=E, 4=F >, 6=A#, 2=D, and 1=C. 


Ee Following the directions above, this short piano composition resulted: 
ROBLEM 


PENTATONIC SCALES 


Pentatonic scales are also easy to use in composition because there are no 
half-steps. Unlike the whole-tone scale, the pentatonic scale rapidly 
establishes a tonal center. (The black notes of the piano form a pentatonic 
scale.) 


e © oe 
L 2Q-2“e6°% or (FF 2. 3 4 8 


To harmonize the pentatonic melody resulting from the program, you can 
use a repeating bass (or ostinato) pattern. 
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SAMPLE 
PROBLEM 


SAMPLE 
PROBLEM 


I NE LOL I ELDER EAE EEE EEE LOL CELE IE 


CoMPOSITION 


With lower and upper limits of 1 and 6 (1+5), the program gave this series: 
3=F, 4=G,5=A, 2=D, 1=C,5=A, 3=F, 2=D, 4=G, 5=A, and5=A. 


An F - C ostinato was added for accompaniment on the piano. 


Major AND MINoR SCALES 


A few very simple rules need to be followed for a conventional-sounding 
composition. 


1. Tonic, first scale degree or 1 from the calculator, should be used on the first 
beat of the first complete measure. 


2. To establish a strong cadence (ending), the next-to-last note should be from 
the V‘ chord (a five chord with a seventh interval added). 
3. The last note should also be tonic. If the melody is harmonized, the last 


note may be any note in the one (I) chord and the lowest-sounding note of 
the harmony should be tonic. 


The lower and upper limits used in the program should be 1 and 8 (1 +7) 
respectively, and the melody produced by the program can easily be 
harmonized with I, IV, and V chords. 


These notes were produced by the program: 


3=E, 2=D, 4=F, 6=A, 5=G, 7=B, 6=A, 3=E, 5=G, 4=F, 2=D, 5=G, 
1=C, 3=E, 6=A,5=G, 4=F 

This melody resulted from applying the above rules: 
3 2 4657 63542 51365 


4 
ree a 
B.= Dima ] 
Tay SmiG ney 2 B28 
[Xt Tt 4 


Adding the appropriate I, IV, and V chords will provide harmony for your 
melody. 
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‘COMPOSITION ai 


TwELvE-TONE Row 


Twelve-tone, or serial, composition can also be accomplished by using the 
program to produce a series of notes. The twelve-tone row uses all twelve 
notes in the octave in any order without repeating notes. (When you 
generate notes with the program, remember to discard repeated notes as 
they appear.) 


Berg's first row was used in two compositions, the song Schliesse mir die 
Augen beide (1925) and Lyric Suite (1926) for string quartet. 


be Berg: Song and Lyric Suite 


Berg: Song 


Schlies - se mir die Au - gen bei-de mit den lie -- ben 


Allegretto giovale ( d= 100) Berg: Lyric Suite 


Berg and other twelve-tone composers of that time constructed their tone 
rows with great care to achieve specific purposes. A calculator-created row, 
however, can also offer some interesting possibilities. And, once the original 
row has been constructed, three other forms can be derived from it: 
inversion, retrograde, and retrograde of inversion. 
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SS IT 


CoMPOSITION 


For example, consider this original row, “O,” from Webern’s Opus 23: 


The inversion, “I,” is obtained by inverting the direction, up to down and 
down to up, of each interval from the first note of the original: 


The retrograde, “R,” results from reversing “O” and writing the notes down 


in that order: 
jor, be? te — = = 


The retrograde of the inversion, “RI,” is similarly obtained by writing “I” 
backwards: 


oF = oie ae 


“O,” “I,” “R,” and “RI” can be used with the notes in any octave and in any 
rhythmic arrangement. 


Music THEORY 


I1OMPOSITION 


SAMPLE 
PROBLEM 


FURTHER 
EXPLORATIONS 


XEFERENCES/ 
NFORMATION 


c- 


For a twelve-tone row, use these note values and limits for the random 
number program: 


=C 5=E 9=G# 
2=C# 6=F 10=A 
3=D 7=F# ll=A# 
4=D# 8=G 12=B 


lower limit = 1 
upper limit = 13 


The program produced this twelve-tone row: 
10=A,3=D, 4=D#, 2=C#, 9=GS, LI=AS, 12=B, 7= FH, 1=C, 
6=F, 8=G,5=E. 


Using the row in its original form, this short piano composition was arranged: 


1, Use the program and one of the techniques outlined in this section to 
create a composition. Then select one series of notes to be used as a 
“thematic” melody repeated at intervals throughout the composition. 


2. Research other harmonizing techniques to be used with a melody 
produced by the program. 


Reginald Smith Brindle, Serial Composition (Oxford: Oxford University Press, 
1977). 

William Christ, Richard DeLone, Vernon Kliewer, Lewis Rowell, and 
William Thomson, Materials and Structure of Music I (Englewood Cliffs, 
N.J.: Prentice-Hall, Inc., 1966). 

Seppo Heikinheimo, The Electronic Music of Karlheinz Stockhausen 
(Helsinki: Suomen Musikkitieteellinen Seura, 1972). 


William Thomson, Introduction to Music as Structure (Reading, Mass.: 
Addison-Wesley Publishing Company, 1971). 
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Pitch Frequency 


Each musical sound (pitch) can be represented as a wave, and the frequency 
of a pitch is determined by the number of cycles the wave completes in one 
second (cps= cycles per second). Since the intervals between the half tones 
in the scale are fixed, it is possible to calculate the frequency of any note if 
you know the frequency of a beginning, or tuning, note. These frequencies 
can then be used in synthesizer music. 


The program listed here calculates these frequencies for the tempered scale. 


Throughout the history of music in Western civilization, several systems of 
musical tuning have been used — Pythagorean, meantone, just, and 
tempered. The tempered scale is the one most widely used today and is 
derived from a few simple premises: 


1. The frequency relationship of the octave is 1:2. 

2. There are twelve half steps in the octave. 

3. The intervals between each of these half steps are exactly the same 
size. 


THEORY 


The relationship between the frequencies of notes in the rising tempered 
scale can be algebraically expressed as 


y =xk" 
where y = the frequency you want to identify, 
x = the frequency of the tuning note, 
k = aconstant=\7/2 , 
n = the number of half steps between the two notes. 


Similarly, to find the frequency of a note lower on the scale than the tuning 
note, the formula is 


y =xk". 


The following program completes both these operations, depending on which 
subroutine you implement. You can easily use the program to calculate the 
frequencies of each note in the scale, rising or descending, or you can 
calculate the frequency of a particular note you want to identify, either 
above or below your tuning note. 
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Program Keystrokes Purpose/Comments 


ae Pa an OFF/ON [LRN Clears calculator and enters 


learn mode. 


THE 


PROGRAM 


1 RA) Stores tuning note’s frequency 
(x). 


02 12 3 Stores the number of half-step 
intervals between note x and 
note y. Then stores number of 
half steps in scale in memory 
3, which is used to control 
looping for calculation of 
entire scale’s frequencies. 


C1288 0) ka 2 
(2nd) IM [R7s) 


Subroutine for rising scale. 
Calculates frequency of y. 


Increases memory 2 (n) by 1 
for calculation of frequency of 
next note in scale. Then 
subtracts 1 from memory 3 
and checks to see if 
contents = 0. If not, loops back 
to (8) to calculate next 
frequency. When content 
reaches 0, displays 0 and stops. 


Subroutine for descending 
scale. 


Increases memory 2 by 1; 
checks to see if loop is 
required. If not, displays 0 and 
stops. 


Exits learn mode. 


REGISTER Roo R,; Used 
Contents RR, x Ros 
Ro. on 
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UsING THE 
PROGRAM 


PircH FREQUENCY 


[Procedure | Pres [| _Diplay/Comments 


Enter frequency of 
tuning note (x). 


To calculate 2. Shows entire number of 
frequencies of entire half steps in scale. 
scale, enter 1. 


To calculate entire 4 Frequency of note | half 

rising scale: step above tuning note. 
Note 2 half steps above 
tuning note. 


Continue to press until all twelve frequencies have been calculated. 
Display will show 0 when run is completed. 


To calculate entire i Frequency of note 1 half 
descending scale: step below tuning note. 


Continue to press until all twelve frequencies are generated. Display 
shows 0 when run is completed. 


OR 
Enter frequency of 
tuning note (x). 

To calculate frequency 
of one note only, enter 
number of half-step 
intervals between note 
x and note y. 


To calculate one note 
only on rising scale: 


Yn 


To calculate one note 
only on descending 
scale: 


yn° 


°This value is printed if the PC-100A is used. 
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Pitch FREQUENCY C= 


SAMPLE 
PROBLEM 


FURTHER 
EXPLORATIONS 


REFERENCES / 
INFORMATION 


1. Determine the frequency of each note in the octave A’ to A’, given that 
the tuning note A’ has a frequency of 440 cps. 


0 


Enter program. 


Enter frequency of 
tuning note. 


Enter 1. 12, 


466.1637615 
493,8833013 
523,2511306 
554.365262 
587.3295358 
622,2539674 
659.2551138 
698.4564629 
739.9888454 
783.990872 
830.6093952 
880. 

0 


Calculate frequencies. 


Note that the frequency of A? is exactly twice the frequency of A’. 


2. Calculate the frequency of F below A, given that the frequency of A is 
440 cps. 


Procedure | Press| Display /Comments 


Enter frequency of A. 440. 


Enter number of half- 
step intervals between 
A and F, 


Calculate frequency of 


349,2282314 


Design a program for determining the frequency of any pitch in one of the 
other systems of tuning, such as the Pythagorean system. 


John Backus, The Acoustical Foundations of Music (New York: W. W. Norton 
and Company, Inc., 1969). 


Juan G. Roederer, Introduction to the Physics and Psychophysics of Music 
(New York: Springer-Verlag. 1973). 


Music THEORY 5-29 


Harmonics 


Almost all sounds, including those produced by musical instruments, are 
actually combinations of pitches of various frequencies. These tones, called 
partials or harmonics, create the tone quality of the whole sound. The main 
frequency, called the fundamental, is the first harmonic. 


The program in this section can be used to compute the frequencies of 
simple harmonics, given the frequency of the fundamental. These frequencies 
can then be used in synthesizers to create the tone quality you want. 


Partials are identified by number, and the number, frequency, and amplitude 
of the partials determine the tone quality of the sound. Theoretically, 
partials extend all the way to infinity; however, musicians usually concern 
themselves only with the first through the fourteenth partials. The 
frequencies above this point are usually inaudible to our ears. 


THEORY 
A so-called pure tone — one without partials above the fundamental — is 
represented by a sine wave, and the sound can be compared to that produced 
by a french horn or flute, mellow and somewhat muted. On the other hand, if 


all the frequencies in a sound are amplified to equal levels, the result is what 
is called ‘‘white noise.” 


In musical tones that remain virtually unchanged for at least a few seconds, 
the partials are related to the fundamental in a very simple way: their 
frequencies are whole number multiples of the frequency of the fundamental 
pitch. The relationship may be expressed as 


y=xn 

where y = the frequency of the partial, 
x = the frequency of the fundamental, and 
n = the number of the partial. 
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Bu.RMonics eis 
Step # | Program Keystrokes Purpose/Comments 


OFF/ON Clears calculator and enters 
learn mode. 

Wm (A) [sto) | RS) Stores frequency of 
fundamental. 


We (3) 2 Stores number of harmonic. 


Lb) | (Ret) Rel] 2 Calculates frequency of 
3) | Pit: | harmonic. 


Exits learn mode. 


Note: Print command may be omitted if the PC-100A is not used. 


REGISTER = Ray 
(ConTENTS = Ry, 
Roz on 
Ry 


3 


Enter frequency of 
fundamental. 


Usinc THE 


Enter number of 
ProcraM 


partial. 


Calculate frequency of 
partial. 


°*This value is printed if the PC-100A is used. 
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SAMPLE 
PROBLEM 


FURTHER 
[EXPLORATIONS 


REFERENCES / 
INFORMATION 


HARMONICS 


What are the frequencies of the first, fifth, and seventh harmonics of a pitch 
whose fundamental is 261.63cps? 


Enter program. 
Select 2-decimal display. mm 2 


Enter frequency of 
fundamental. 


Display /Comments 


Enter number of 
partial and calculate 
frequency. 


261.63 Frequency of Ist 
harmonic. 


Enter next partial and 1308.15 Frequency of 5th 


calculate frequency. harmonic. 
Enter last partial and 1831.41 Frequency of 7th 
calculate frequency. harmonic. 


Design a program for a synthesizer, using the frequencies generated by the 
program included here. 


John Backus. The Acoustical Foundations of Music (New York: W. W. Norton 
and Company, Inc., 1969). 


Juan G. Roederer, Introduction to the Physics and Psychophysics of Music 
(New York: Springer-Verlag, 1973). 
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Selected Listening Guide for c= 


Computer and Electronic Music 


Babbitt, Milton. Composition for Synthesizer (1963). Columbia MS-6566. 
_____.. Ensemble for Synthesizer (1967). Columbia MS-7051. 
Berio, Luciano. Thema: Omaggio a Joyce (1958). Turnabout 34177. 
> Visage (1961). Turnabout 34046. 

Cage, John. Aria with Fontana Mix (1958). Mainstream 5005. 
—_____.. Variations IV. Everest 3230. 

Cope, David. Arena. Orion ORS-75169. 

_____.. K and Weeds. (1971). Discant 1297. 

Davidovsky, Marion. Synchronisms 1, 2, and 3. CRI S-204. 
Synchronisms 4, 5, and 6. Turnabout 34487. 

Dodge, Charles. Earth’s Magnetic Field (1970). Nonesuch 71250. 
Hiller, L. and Baker. Computer Cantata (1963). CRI S-310. 

Hiller, L. and John Cage. HPSCHD (1968). Nonesuch H-71224. 
Hiller, Lejaren. Machine Music (1964). Turnabout 34536. 

Kagel, Mauricio. Acoustica (1970). DC-2707059. 

Ligeti, Gyérge. Articulation (1958). Wergo 60059. 

Luening, Otto. Synthesis (1960). CRI S-219. 

Nonesuch Guide to Electronic Music. Nonesuch HC-73018. 
Randall, J. K. Lyric Variations for Violin and Computer (1967). Vanguard 
C- 10057. 

____.. Quartets in Pairs (1964). Nonesuch 71245. 

Stockhausen, Karlheinz. Gesang der Jiinglinge. DG-138811. 
Bes, Hymnen. DG-2707039. 

_____.. Kontakte. DG-138811. 

_____.. Telemusik. DG-137-012. 

Subotnick, Morton. 4 Butterflies. Columbia M-32741. 

. Silver Apples of the Moon. Nonesuch 71174. 

Ussachevsky, Vladimir. Creation-Prologue. Columbia MS-6566. 
_____.. A Piece for Tape Recorder. CRI-122. 

ae ee Of Wood and Brass. CRI S-227. 

Varese, Edgard. Poeme électronique. Columbia MS-6146. 
Wuorinen, Charles. Times Encomium (1969). Nonesuch 71225. 
Xenakis, Iannis. Various electronic compositions. Nonesuch 71246. 


For a complete up-to-date listing of recordings for purchase, check the 
current Schwann Record Catalog. 
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Business 


an 
Operations 


Research 


Introduction 


The daily operation of almost every business, whether large or small, requires 
that many decisions be made. Some of these decisions are financial in nature, 
some involve production or sales planning and forecasting, and all are vital to 
the on-going good health of the company. Today’s handheld programmable 
calculators offer the modern businessman a powerful and exciting tool to use 
in making these decisions. 


The examples shown in this chapter are just a few of the possible applications 
and were selected to show the versatility of the calculator. Included are the 
following topics: 
@ exploring an inventory-control model (EOQ), 
e finding the present value, future value, and internal rate of return 
for a series of periodic unequal cash flows, 
® calculating a capital-budgeting model, with the choice of 
straight-line, sum-of-the-years’-digits, or declining-balance 
depreciation, 
© setting up a queuing model that reduces the cost of the service 
facility, and 
© forecasting market shares (Markov Analysis). 


In each case, once the program is entered, the real value of the calculator 
becomes evident. You can easily change the input parameters and observe 
directly the effects of the changes. Manipulating the model in this way helps 
you determine optimum values for your situation and test for sensitivity 

in certain areas. 
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BusINEss AND OPERATIONS RESEARCH 


/ f \ ; 1 
Facts/ 
THEORY 


Inventory Control 


Inventory control plays an important part in the financial management of 
most businesses. Capital that could be used in other ways is tied up in holding 
inventories, and the related costs of storage and insurance increase with the 
size of the inventory; therefore, companies must try to find the most 
economical quantities to be held in inventory. 


This section investigates the generalized inventory model known as the 
Economic Order Quantity (EOQ), and the program included here calculates 
the EOQ, the minimum inventory costs for a specified time period, and the 
number of times to order replacement stock during the period. 


The model we are using is based on the following formulas: 


ar 


EOQ =, /=4- +S 
Cin = V 2KLM 
ae 
N= 500 
where EOQ = _ the Economic Order Quantity in units. 

Cain = the minimum inventory costs for the time period, 
N = the number of times replacement stock should be 

ordered during the period, 
K = the cost of placing and receiving each order, 
L = the total number of units used during the period, 
M = the cost of carrying one unit in inventory for the time 

period, and 
S = the “safety” quantity of stock to be held in inventory. 


“Safety” stock is that inventory held to minimize the risks or losses involved 
in running out of a crucial part or item. If sales would be lost or 
manufacturing production stopped because of a “‘stock-out,” or if usage rate 
varies considerably and delivery time for replacement stock is long, 

a firm will usually require a fairly high level of safety stock. We won't discuss 
here the methods used to determine stock-out costs, but a full treatment of 
this subject is included in many production and operations research textbooks. 


To use the following program, first enter the fixed cost of placing and 
receiving an order (K), the total (or estimated) number of units to be used, the 
cost of carrying one unit in inventory, and the safety stock quantity. You can 
then calculate the EOQ, the minimum inventory costs (C,,\n), and the number 
of times replacement stock should be ordered (N). 


ris 
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INVENTORY CONTROL 


THE 
PROGRAM 


REGISTER 
CoNnTENTS 


UsING THE 
PROGRAM 


OFF/ON Clears calculator and enters 
learn mode. 
WE (A) 1 2 Stores K, L, M, and S, 
4 


Calculates EOQ. 


038 MOH Cc) Re 5 Rel] 3 Calculates Crain. 
(=) Pit 


z 
al 


Roo Ros S 
Ro, K Ros = 2KL 


Roz L Ros EOQ 


Procedure 


Clear memories. 


a 
5 


Set decimal for desired 
accuracy. 
Enter data. 


i 
y 


re) 
igs 
3] 5) 


K 
L 
M 
S 


Calculate EOQ. 
Calculate Cyin. 
Compute N. 


°This value is printed if the PC-1OOA is used. 


Hoe 
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SAMPLE 
PROBLEM 


a 


FURTHER 
EXPLORATIONS 


REFERENCES/ 
INFORMATION 


INVENTORY CONTROL 


A manufacturing company annually uses 30,000 units of a certain part. 
Because the part is essential to several production lines and delivery time on 
reorders is usually about two weeks, the company wants to maintain a safety 
stock of 1,000 units. Each order for replacement stock costs approximately 
$20, and the cost of carrying one unit in inventory for one year is estimated to 
be $0.12. What is the Ecoriomic Order Quantity? What are the minimum 
annual inventory costs, and how many times each year should replacement 
stock be ordered? 


K = $20 M 
L = 30,000 units S 


$0.12 
1,000 units 


Procedure 


Display/ Comments 


Enter program. 0 | 
Set decimal at two 0.00 | 
places. 
Enter data. 

20 (4) 20.00 

30000 30000.00 

12 0.12 

1000 1000.00 
Calculate EOQ. 4162.28 | 
Calculate C,;,. 379.47 
Calculate N. 7.21 


The Economic Order Quantity is about 4,162 units. Minimum inventory costs 


are $379.47 per year, and orders should be placed approximately seven times 
a year. 


Test the model for sensitivity to slight changes in K, L, and M. For instance, 
what happens in the example listed above if M is increased to $0.15? 
(Answer: EOQ becomes 3828 units, Ci, is $424.26, and N is 8.) 


J. Fred Weston and Eugene F. Brigham, Essentials of Managerial Finance, 
2nd ed. (New York: Holt, Rinehart and Winston, Inc., 1968), pp. 310-314. 
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Variable Periodic Cash Flows 
and Internal Rate of Return 


Very common in business are annuity-like situations in which the periodic 
cash flows are unequal amounts. The program included here calculates 
present value (PV), future value (FV), and internal rate of return (IRR) for a 
series of variable periodic cash flows. 


Like annuity payments, variable cash flows can occur either at the end of the 
period or at the beginning of the period. For calculating PV and FV the 
formulas are: 


Payments at end of period 


Facts/ PV == CF, (1+i)* 
THEORY x 


FV= E CF, (1+ | (1 +i)? 
Payments at beginning of period 


PV = s CF, (I+ | (1+i) 
1 


rv-[§ CF, (1 siya 
1 


where CF, = cash flow at period k (k= 1 through n), 
i= periodic interest rave Vapcessed as a decimal, 
k = intermediate period from | to n, and 
n= total number of compounding periods. 


Note that cash flows occurring at the beginning of the period are compounded 
for n+] periods, rather than n periods. 


To find IRR it is necessary to use an iterative solution, and we’re using here 
the Newton-Raphson method to approximate the interest rate i (or IRR): 
f(i) 


A) Fh f’(i) 


fi) = E CF, (1 | —pv 


f(i)=—n : CF, (1+i)% 


(For a detailed explanation of the Newton-Raphson method, see Chapter 3, 
“Approximating Roots of a Function.”) 
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VARIABLE PERIODIC CasH FLows 
AND INTERNAL RATE OF RETURN 


In the program listed below we enter 0 as our first “guess” (i) and instruct the 
program to loop for 10 iterations, or until the change in i is less than .00001. 


You may want to change the initial i, the number of iterations, and/or the 
accuracy limit to fit the requirements of your particular situation. These 
changes can be made easily by minor editing of the program. In some cases 
where negative cash flows are present, it is possible that there is more than 
one root to the equation. Our program, in general, finds the root (i) closest to 
zero that satisfies the conditions you enter. If you suspect that there may be 
multiple roots, you may want to enter + 0.9 as an initial “guess.” 


Given the interest rate i, the program solves for PV or FV for a series of 
periodic cash flows occurring either at the end or at the beginning of the 
period. Given the cash flows and either PV or FV, the program also finds IRR. 
Some of these calculations require special entry for certain cash flows, and 
these special cases are noted in Using the Program below. 


Step + | Program Keystrokes Purpose/Comments 


OFF/ON EN) 


Clears calculator and enters 
learn mode. 


[2nd] |B | 20 Calculates = CF,(1+ i)>* and 
(RO) (2) 6 xX) 1 > —kCF,, (1+i) -**» 

8D) [Rc] 0 (summations for PV and IRR 
(=) sum 4 0 calculations). 
BSew!1 Ret] § LD) 

Ee SUM 5 26 

[2nd] ] (2nd) EG 4 

[=J 7 (=) fy) 

[2nd] [2nd] 8 Recalls new IRR if 

| Pit] difference between old 


IRR,,, and new IRR,., 
is less than .00001. 


Initializes memory registers 
for new summation. 
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WaRIABLE PERIODIC CASH FLOWS 
MAND INTERNAL RATE OF RETURN 


Step # Program Keystrokes Purpose/Comments 

071 2nd) QO (2nd) MW (cir) Stores 0 as first “guess” for 
sto] 08 10 9 | tt | IRR routine, 10 as number 
{EE} .00001 ft) [E) Le: | of iterations, and .00001 as 
eS) 5 2) 8 accuracy limit. When 
(sto) 3 (=) [sto] § (=) Re 3 change between new and 
Ee UNV) iz=1} old IRR... <.00001, exits 
(2nd) GH CE) Ta 9 loop and displays new 
(EE) § (2nd) estimate as IRR. 

120 (2nd) MO (A) i 6 Stores CF, (memory 6 used 
HE 26 KE 22 for indirect storage and 
2nd) HOM 2) recall) and increases 

memory registers 1 and 2 
| by 1. 
131 (2nd) (OH (8) (sto) 7 [R/S] Stores PV for IRR routine. 
136 (2nd] HOM (c} [sto] § [E) Stores i and computes PV 
(2nd) MEM (Rct) 4 (2nd) (payments at end of period). 
[R/S 
146 HOH (2nd) GM [sto] § (E) Stores i and computes PV 
2nd) MM [rc] 4 (xX) () 1 (payments at beginning of 
rct] § [) ] (=) 2nd) period). 
(®) 8 (E] Stores i and computes FV 

nd) BOM fect} 4 (xX) (1) 1 (payments at end of period). 
8 DO) G7) 2E) 


ey 5 
Ww 


| Pit 

Lot | Lo Stores i and computes FV 
WOM [Rcl) 4 (payments at beginning of 
8D) period). 

1D) &) 


Dl in 2 nN 
B/HHBE ARR RHeB 
wD 
4 


Exits learn mode. 


Note: Print commands may be omitted if the PC-100A is not used. 
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REGISTER 
CONTENTS 


UsING THE 
PROGRAM 


VARIABLE PERIODIC CASH FLOWS 
AND INTERNAL RATE OF RETURN 


Roo Used Rs =—k(CF,)(1 +i 


Rio 
Ro, Used Ro, Used R,, Remaining 
Ry» on R,; PV R,, registers 
Ro; IRRora Rog R,, used as needed 
Ry, 2 CF,(i+i)* Ros Used R,, for CF’s. 


accuracy, 


To find PV or FY: 
Initialize. 0. 
Enter cash flows 1 CF, 
through n. ac 
CF, 
Enter i as a decimal pv° 
and calculate PV or 
FV. FV° 
To find IRR, PV known: 
Initialize. 0. 
Enter cash flows | CF, 
through n. se 
CF, 
Enter PV. 0 
Calculate IRR. IRR° Expressed asa 
decimal. 
To find IRR, FV known: 
Initialize. 0. 
Enter cash flows | CF, 
through n-1. Sele 
CF,., 


Enter CF, — FV as last 
cash flow. 


Enter 0 as PV. 
Compute IRR. 


CF, (CF, — FV =CF,) 
0 
IRR* 


°This value is printed if the PC-100A is used. 
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WARIABLE PeERrloDIC Casu FLows 
uND INTERNAL RATE OF RETURN 


For Payments at Beginning of Period 


Clear memories and 


set decimal for desired 
accuracy. 


To find PV or FV: 
Initialize. 


Enter cash flows | 
through n. 


Enter i as a decimal 
and calculate PV or 
FV. 

To find IRR, PV known: 
Initialize. 


Enter cash flows 2 
through n. 


Enter PV —CF,. 


Calculate IRR. 


To calculate IRR, FV 
known: 


Initialize. 


Enter cash flows 1 
through n. 


Enter —FV as final 
cash flow. 


Enter 0 as PV. 
Compute IRR. 
°This value is printed if the PC-100A is used. 
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VARIABLE PERIODIC CAsH FLows 
AND INTERNAL RATE OF RETURN 


CALCULATION OF IRR, FV KNOWN (CASH FLOWS AT END OF PERIOD) 


Your company has made the following deposits (at the end of each month) in 
an investment account: 


SAMPLE 
PROBLEM Month 1 2 8 4 5 


Deposit $500 $800 =$1000 = $1200 ~——- $1500 


At the end of the fifth month, the amount in the account is $5564.33. What 
retum rate are you earning? 


Enter program. 0 


Set decimal at 4 
places. am 4 0.0000 


Initialize. LE} 0.0000 


Enter all but the last 500 (4) 500.0000 CF, 
cash flow. 800 [A] 800.0000 CF, 
1000 [A] 1000.0000 CF, 
1200 [A] 1200.0000 CF, 


Subtract FV from CF; 
and enter as last cash 1500 (©) 1500.0000 
flow. 5564.33 =) (4) |—4064.3300 CF, 


Enter 0 as PV. 0 8) 0 
Compute IRR. eas 0.0700 IRR 


The account is earning 7%. 


CaxcuLaTIon OF IRR, PV KNOWN (CASH FLOWS AT BEGINNING OF PERIOD) 


A manufacturer will either sell a machine for $50,000 or lease it for five years, 
with the lease payments to be made at the beginning of each year. The lease 


payments would be: 
Year 1 2 3 4 5 
Payment $14,500 $13,500 $12,500 $11,000 $10,000 


What return rate will the lease situation earn? 


Se a SS ee ee ee ee ee eee 
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WAARIABLE PERIODIC CASH FLOWS 
uD INTERNAL RATE OF RETURN 


Procedure \ Fics, | Display/Comments 


Initialize. LE] 0.0000 


Enter CF, through 13500 [A] 13500.0000 
CF;, 12500 [A] 12500.0000 
11000 [4] 11000.0000 
10000 [A] 10000.0000 


Subtract CF, from cost 

of machine and enter 50000 (=) 50000.0000 

as PV. 14500 =) (3) 35500.0000 This is the cost of 
the project to the 
manufacturer; 
i.e., the money he 
does not earn if 
he leases, rather 
than sells, the 
machine. 


Calculate IRR. 


The lease arrangement earns almost 13% for the manufacturer. 


The program above assumes that the compounding period and the cash flow 
period are the same. What happens if they are different? For example, 
consider a situation with monthly cash flows and quarterly compounding. To 
calculate PV or FV for this case, you must convert the interest rate before 
FURTHER entering it into the program. The interest rate per cash flow period (7) is given 


IXPLORATIONS 
by: ; 
Y= I 1 +iy]- 1 


where i is the interest rate per compounding period, m is the number of 
compounding periods per year, and k is the number of payments or cash flows 
per year. 


To calculate IRR where the cash flow or payment period differs from the 
compounding period, you simply convert the calculated IRR with the 


following equation: 
i= [ane -1 


Here Y is the calculated IRR per payment period, and i is the equivalent IRR 
per compounding period. 


Change the program to perform these calculations. 


\ereRENCES/ Roger F. Farish et al, Calculator Analysis for Business and Finance 
NFORMATION (Dallas: Texas Instruments Incorporated, 1977), pp. 4-23—4-30. 
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Facts/ 
THEORY 


Capital Budgeting 


Capital budgeting is a complex process that is essential to sound financial 
management in business. It involves the planning and evaluation of any 
capital outlay with expected returns extending beyond one vear’s time — the 
acquisition of land or buildings, for example, or the purchase of new 
equipment. Because expenditures of this type mean that a certain amount of 
capital must be tied up or committed initially, with returns spread over 
several years, these projects must be examined carefully for their potential 
profitability. 


The program listed here allows you to find the present value, after taxes and 
depreciation, of a series of cash flows created by the acquisition of an asset. 
The result can be used as a measure of the profitability of the project. 


Before capital budgeting can begin, the returns (cash inflows, savings, etc.) of 
the project must be estimated. Obviously the forecast of these returns is 
critical, since overestimation or underestimation can give a completely false 
picture of the project’s profitability. Once the returns have been estimated, 
the next step is to calculate the present value of the projected returns and 
then to compare this to the cost of the project. 


This generalized capital budgeting model uses the following expressions: 


NCF, = CF,(1—T,)+D,(T;) 

ACF = P-—[(P—NBV,)XTy.] 

NBV = RDV+SAL 

k 
PV = [Sxcr,a+R)*]+acra+R)* 
where NCF, = __ net cash flow at end of period n after taxes and depreciatic 

CF, = cash flow at end of period n before taxes and depreciation, 
Ab = average tax rate on annual income, 
D; = depreciation during period n, 
ACF = after-tax cash flow from selling asset at end of period k, 
P = gross proceeds (cash received) from sale of asset, 
NBV_ = __ net book value of asset at end of period k, 
Te = tax rate on gain or loss from sale of asset, 
RDV = _ remaining depreciable value at end of period k, 
SAL = salvage value for depreciation, 
PV = present value of cash returns or savings, 
R = required rate of return, expressed as a decimal, 
k — 


= decision period or period at end of which the asset is 
resold, and 


n = any intermediate period between purchase of asset 
and its resale. 
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CAPITAL BUDGETING 


THE 
PROGRAM 


The following program solves these expressions and calculates the present 
value of the total after-tax cash inflows or savings generated by the asset. The 
cost of the asset is then subtracted from the computed present value to find 
the net present value of the project. If the net present value is negative, the 
project does not meet the company’s required return rate. If zero or positive, 
however, the project meets or exceeds the company’s required rate of return. 


Three types of depreciation are offered by the program, depending on which 
subroutine you select. Subroutine CE] calculates NCF, using straight-line 
depreciation; subroutine [2] uses the declining balance method, and 
subroutine CE] the sum-of-the-years’-digits method. 


A note about Declining Balance Depreciation: When this method is used, two 
considerations are very important — one, the asset can’t be depreciated (for 
tax purposes) below its salvage value; and, two, if the asset will not be fully 
depreciated down to salvage value by (or before) the end of its life, the 
company should switch over at some point to the straight-line depreciation 
method to maximize the tax advantage. (The crossover point is the period 
when the straight-line depreciation amount exceeds the declining balance 
amount.) Safeguards are “built into” the declining balance subroutine to meet 
these conditions. 


If you are using the TI Programmable 58, you will need to repartition the 
calculator since the program has more than 240 program steps. See pages 
V-42 and V-43 in Personal Programming for a discussion of partitioning. 


Program Keystrokes Purpose/Comments 


OFF/ON Clears calculator and enters 
learn mode. 


Stores cost of asset. 


Stores salvage value of asset 
for depreciation. 
Stores life of asset and 


sum-of-the-years’-digits for 
SOYD depreciation. 


032 9 0 Stores resale value of asset 
and clears counting register. 
5 Stores income tax rate (T,). 
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[2nd] MU [A] {sto} 2 (Sto) 1] 
[S10] 13 [RA] 


[sto] 3 (inv) (SUM J] [Inv] SUM 13 


so) 4 1 EO ko 4 
2 (=) So] 15 RA 


CAPITAL BUDGETING 


Purpose/Comments 


043 [sto] 6 RRA) 


Stores gains/loss tax rate on 
sale of asset (T.). 


046 1 & 0) 7 Stores 1 + required rate of 


return (R). 


8 Stores factor for declining 
balance depreciation. 
Note: Data must be entered 
in the order shown above. 


Straight-Line Depreciation: 
Calculates depreciation for 
period n and remaining 
depreciable value (RDV). 


Calculates PV of net cash 
flow. Sums and displays PV 
at end of period n. 


Declining Balance 
Depreciation: Checks to see 
if RDV =0. If so, transfers 
to te. 


Calculates modified 
straight-line depreciation 
for later comparison to 
declining balance 
depreciation, 


Calculates declining 
balance depreciation for 
period and compares to SL | 
amount. If DB<SL 
(crossover point), transfers | 
to HG. Then checks to 
see if DB depreciation will 
depreciate asset below 
salvage. If so, transfers to 


(2nd) a 
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Program Keystrokes Purpose/Comments 
164 


(Rct] 14 [STO] 1Q [INV] SUM 13 If all tests default, DB 

Le depreciation expense is 
allowed, and program 
transfers to [24] HEM to find 
PY; 


172 Sum-of-the-Years’-Digits 
Depreciation: 
Calculates depreciation for 
period n and RDV. Then 
loops to EB to 


calculate PV,,. 


Computes after-tax cash 
flow (ACF) from selling 
[=] asset, and calculates and 
[RCL] displays PV of project. Then 
{RCL} subtracts cost of asset to find 
NPV of project. 

237 Sets flag 1 to indicate that 
RCL 


SL depreciation is 
preferred, rather than DB 
depreciation, for remainder 
of asset’s life. Finds RDV 
using SL depreciation and 
loops to EB to 
calculate PV,,. 


MO (2nd) MG (cir) [sto] 10 


Asset is fully depreciated 
(RDV =0). Enters 0 as 

depreciation for period n 
and loops to tO 


Enters RDV as depreciation 
for period n and loops to 


(2nd) 


[a 


Note: Print commands may be omitted if the PC-100A is not used. 
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REGISTER 
CONTENTS 


UsING THE 
PROGRAM 


SE SS FE I 


CAPITAL BUDGETING 


Roo Year counter R, 
Ro CF, Ro 
Roz Cost of asset Ry: 
Ro; Salvage value R, 
Ro, Life of asset Ro. 


Procedure 


Enter program. 


Select two-place 
decimal setting. 


Enter data. 
Cost of asset. 
Salvage value. 
Life of asset. 
Resale value. 


Income tax rate (T,) 
as a decimal. 
Gain/loss tax rate 
(T.) as a decimal. 
Required rate of 
return (R) asa 
decimal. 


DB factor. 


Enter CF, and press 
[¢}, (2), or CE), 
depending upon which 
kind of depreciation 
you are using. 


6-16 


Ti 

T, 

R+1 

DB factor 
Resale value 


Ry Dep, 
R,, Cost —salvage 
Ri NPV, 
R,, RDV 
R,, Used 
R,, SOYD 
Display/Comments 
0 
0.00 
Cost 
Salvage 
SOYD 


0.00 (Year-counting 
register cleared.) 


Factor This step may be 
omitted if you are 
using SL or SOYL 
depreciation. 


NPV,° With straight-lin 
depreciation. 


NPV,° With declining 
balance 
depreciation. 

NPV,° With sum-of-the- 
years’- digits 
depreciation. 
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CsAPITAL BUDGETING 


SamMpLe 
PROBLEM 


Repeat for each cash 
flow. When all cash 
flows have been 
entered, calculate PV 
of project. 


Compare with cost of 
asset or project. 


°This value is printed if the PC-100A is used. 


A company is evaluating a project involving the purchase of a new machine. 
The machine costs $50,000 and has a life of ten years, with a salvage value of 
$7,000 for depreciation purposes. At the end of the fifth year, however, the 
machine can be sold for $25,000. The tax rate on gain/loss will be 25%. 


The company uses double declining balance depreciation (a factor of 2) for its 
assets and expects a 15% rate of return after tax on its projects. Taxes on 
income have averaged 40% in the past. According to best estimates, the 
project should create the following annual cash flows before depreciation and 
taxes: 


Year 


Will the project be profitable? In other words, will the present value of the 
project’s returns exceed its initial cost? 
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CAPITAL BUDGETING 


Enter program. 


Display/Comments 


Clear memories and | Cis | 
flags and select i 2 


two-decimal accuracy. 


Enter data. 


Cost of machine. 50000 (4) 50000.00 
Salvage value. 7000 7000.00 


10 55.00 Sum-of-the- 
years -digits. 
0.00 Counting 


register cleared. | 


Life of machine. 


Resale value. 25000 


Income tax rate. 4) 0.40 T, 
Gain/loss tax rate. 25 0.25 T, 


Required return 


rate. 15 1.15 (R+1) 
DB factor. 2.00 
Enter first year’s cash 
flow (CF,) and 5043.48 PV at end of 


calculate PV at end of 
period 1 with DB 
depreciation. 


period 1. 


Enter second year’s 
cash flow (CF:) and 
calculate PV at end of 
period 2. 


10000 (2) 12000.00 PV at end of 


period 2. 


Enter remaining cash 
flows: 


CF; 15000 (2) 19600.89 PV at end of 
period 3. 

CF, 25000 [2] 29348.14 PV at end of 
period 4. 

CF; 35000 [2] 40603.42 PV at end of 


period 5. 


Le Se oe a ee a ee ee ee re ee 
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CaPITAL BUDGETING 


FURTHER 
SINPLORATION 


XREFERENCES / 
YNFORMATION 


Procedure Display/Comments 


(2nd) 51961.92 


Now calculate entire 
PV of the project. 


[3 NCF(1 +n) + 
1 


[ACF (1+Ry*] 


Compare to cost of 
machine. 


1961.92 NPV of project. 


Since the net present value is positive, the project’s return rate will exceed 
the rate of return required by the company. The project is profitable. 


1. Suppose the company had used straight-line or sum-of-the-years’-digits 
depreciation, rather than declining balance. Would the net present value of 
the project be affected? 


2. Test the sensitivity of the model to slight changes in T,, T:, or R. 


J. Fred Weston and Eugene F. Brigham, Essentials of Managerial Finance, 
2nd ed. (New York: Holt, Rinehart and Winston, Inc., 1968), chapter 8. See 
also chapter 9 for a discussion of risk in capital budgeting procedures. 
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Queuing 


In many organizations there are processes which generate waiting lines or 
queues. Queues form when someone must wait for service because the 
servicing facility is temporarily unable to provide that service. Industry 
typically pays for both the lost time of persons waiting in line as well as the 
wages of the people who provide the service. Queuing theory provides a way 
for management to arrive at the lowest total cost by determining how many 
persons to hire for the servicing facility. This program handles the multiple 
server case with arrivals Poisson distributed and an exponential service time 
distribution. Although this is only one of several models, it is hoped that it will 
illustrate some of the potential of the use of the programmable calculator in 
this area of study. 


The terms used in this problem are: 


N — number of servers 

LL — average number of customers served per time period 

r — average number of customers arriving per time period 

P; — probability of nobody in the system 

Cw — — cost per time period of customer waiting time 

Cs — cost per time period for one service line 

TC — — total cost for operating service facility 

Lq — expected number of customers waiting in queue 

L — expected number of customers in the system (those being 
served plus those waiting for service) 

Wq_ = — average time spent waiting to be served 

Ww — average time spent in the system (includes time spent being 


served and waiting for service) 


We will assume in this example that there will always be more customers 


coming into the system and that the customers will be taken on a first-come, 
first-served basis. 


One important parameter used in queuing models is the utilization factor. We 
will use it often in the model, and it is defined as: 


A 


Np. 
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QIvVEUING 


For this particular model, with Poisson arrivals and exponential service times, 
the following equations are used. 


= ee 


zo. | KS N! — 
NXp* 1 
| A Po 
mie | 
Wq= X 
W=Wq+— 
L=AW 


TC =NCw+Cs\Wq 


The following program allows you to enter N, A, #, Cw, and Cs, and then 
computes the remaining values. By varying the number of servers, you can 
minimize the desired values to analyze particular queuing situations. 


Program Keystrokes Purpose/Comments 


OFF/ON Clears calculator and enters 
learn mode. 


000 Lb! | EAS) 0 Subroutine to compute 
| x= | cee factorials. 


4) MON (2nd) MM (Rc) 0 (Xx) 
a 0 (2nd) 


MON (2nd) (=) inv) (sae) 


THE 
PROGRAM 


2] Be Be 


Calculates P,. 


N-1I 


Computes 


BAMA Bl 


(Ne* ;_1 
Computes NI Crd 


N 
N 

and completes calculation 

of Po. 
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CONTENTS 


QUEUING 


Purpose/Comments 


Program Keystrokes 


(2nd) MO CA) (sto) 7 (sto) | (=) J 
(=) (0) 2 BS) [Sto] 6 PS) [S10] 5 
E) CO ke) 7 GO ky 6 0) 
(=) (So) 4 RA 


fecal aca! ia 


Stores N, N—1, p, andA. 
Computes p. 


Stores Cw and Cs. 


Calls subroutine Hl to 
compute P,. Then 
completes calculation of Lq. 


Computes Wq. 


Computes W. 


Computes L. 


Computes TC. 


Displays Lq. 
Displays Wq. 
Displays L. 
Displays W. 


Note: Print commands may be omitted if the PC-100A is not used. 


Roo Used Ros pt Roe se 
Ri Used R,; N Ri, W 
Roe N-1 Ros Po Rys Cw 
Ro; Used Roy Lq R,, Cs 
Ro Pp Rio Wq R, TC 
Ros A 


2.) el Bs Se SE er ae ee ee ee See eee 
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QiuEUING 


Usinc THE 
ProcraM 


SAMPLE 
PRoBLEM 


accuracy. 
Enter N. 
Enter p. 
Enter A. 
Enter Cw. 
Enter Cs. 


Begin calculations. 


Display results. 


eee 


Es] 
as 
vn 


*This value is printed if the PC-1O0A is used. 


The Ace Machine Company uses forklift trucks to move pieces of machinery 
from one part of the factory to other parts for further work. If a worker is idle, 
waiting for a forklift to bring him a piece of machinery, he is still paid $7.00 
per hour for his time. The company currently uses two forklifts and has 
determined it costs $12.00 per hour to operate each one. Requests for a 
forklift’s service follow a Poisson distribution with an average of ten calls per 
hour. It takes a forklift an average of four minutes per request to move a piece 
of machinery. The service time is exponentially distributed. Use the program 
to determine if the firm should purchase an additional forklift. 


Enter program. 0 
0.00 


(2nd) MM 2 


Fix decimal for desired 
accuracy. (We'll use 2.) 


Enter N. 2 [AJ 1.00 N-1 
Enter p. 15 15.00 p 
Enter A. 10 0.33 p 
Enter Cw. zr 7.00 Cw 
Enter Cs. 12 12.00 Cs 


[ec] 24.58 TC 


Begin calculations for 
two forklifts. 
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uF! To 
FURTHER 
EXPLORATIONS 


REFERENCES/ 
INFORMATION 


QUEUING 


a 


Display results. 


Display/Comments 


Clear memories to 


begin next calculation. 0.00 
Enter N. 2.00 N-1 
Enter rest of data, the 15.00 pu 
same as above. 0.22 p 

7.00 Cw 

12.00 Cs 

Begin calculations for 
three forklifts. 36.07 TC 


Display results. 


It would cost the company more per hour to operate three forklifts. Thus, at 
the present time the company should not purchase a third forklift. 


1. Write a program that will find L, Lq, W, and Wq for a single server model 
with Poisson arrivals and either an exponential service time distribution or 
a constant service time. 


2. Suppose we have a queue where all customers must pass through multiple 


servers in a line. Write a program to compute L, Lq, W, and Wg for this 
type of queue. 


R. I. Levin and C. A. Kirkpatrick, Quantitative Approaches to Management 
(New York: McGraw-Hill Book Company, 1965), chapter 15. 


J. E. Ullmann, Theory and Problems of Quantitative Methods in Management, 
Schaum’s Outline Series (New York: McGraw-Hill Book Company, 1976), 
chapter 19. 


i ed ee be ee ee ee 2 
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\Warkov Analysis 


Facts/ 
THEORY 


Markov analysis is a method of analyzing the current movement of a variable in 
order to predict the future movement of that variable. As a tool for business 
management, Markov analysis is most often used as a marketing aid in 
predicting consumers’ brand loyalty. The program here is designed to help 
you perform the matrix arithmetic involved in doing a Markov analysis. 


To demonstrate the basic application of Markov analysis, we'll use an 
example involving three companies (the process is the same regardless of the 
number of companies used). We'll assume that two pieces of data are known: 
the number of customers for each company and the company from which new 
customers were obtained. To simplify the mathematics involved, we will also 
assume that no new customers enter and no old customers leave the market 
during the period we wish to analyze. 


Let’s use the three companies X, Y, and Z for our analysis. Suppose we have 
the following records showing the gain and loss of customers each company 
experienced during the month. 


Gains Losses 
March 1 From From From To To To April 1 
Company Customers  X ¥ Z X ¥ Z Customers 
X 300 0 30 10 0 10 20 310 
Y 500 10 0 25 30 0 15 490 
Zz 200 20 15 0 10 25 0 200 


To use the Markov analysis, we will have to compute transition probabilities: 
the probability that a company will retain its customers, the probability that 
a company will gain new customers from another company, and the 
probability that a company will lose customers to another company. 


These transition probabilities are usually presented in a transition matrix. The 
standard form of the matrix expresses the retention and loss by the rows, and 
retention and gain by the columns. Thus, for our example, the transition 
matrix is shown below. 


Retention and loss 


X a Z 
X 270/300 = .900 10/300 = .033 20/300 = .067 \ Retention 
Y ( 30/500 = .060 455/500 = .910 15/500 = .030 and 
Z 10/200 = .050 25/200 = .125 165/200 = .825 gain 
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In this problem we will use a first-order Markov process. This means that we 
assume that a purchase decision next month depends solely on the customers’ 
choices this month. Studies have shown that first-order processes are reliable 
predictors of the future, especially when the transition matrix remains fairly 
stable. 


We know that the April 1 market shares for each company are: 


X=310/1000=.31 
Y =490/1000 = .49 
Z=200/1000 = .20 


To calculate the expected market share for each company on May 1, we set 
up the April 1 market shares as a matrix and multiply this matrix by the 
transition matrix. This computation is shown below for our example. 


April 1 Transition Probable May 1 
market shares matrix market shares 
900 .033 .067 

(31 49 .20) x (0 910 030) 


= (318 .481_ .201) 
050 .125 .825 


To calculate the probable June 1 market shares, you simply multiply the 
probable May | market shares by the transition matrix. 


It is reasonable to assume that, if none of the companies in the market takes 
any action to alter the transition matrix, then a state of equilibrium might be 
reached some time in the future. We can find the equilibrium market shares 
for our example by solving the following simultaneous equations: 


X=.900 X + .033 Y + .083 Z 

Y=.060X + 910 Y + .030Z 

Z=.050 X + .125Y + .825Z 

1=X+Y+Z 
Since we have four equations and only three unknowns, we may drop one 
equation. Thus this system can be rewritten in the normal form as: 


—.100 X + .003 Y + .083 Z=0 
.060 X — .O90 Y + .030 Z=0 
X+Y+Z=1] 


By solving this system of equations we may find the equilibrium market 
shares. 


The following program will compute the probable future market shares and 
the equilibrium market shares for a three-by-three transition matrix. The 
program uses Master Library program ML-02 to solve the simultaneous 
equations, 
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Step # | Program Keystrokes 


Purpose/Comments 


OFF/ON [Ry] 


Clears calculator and enters 
learn mode. 


(2nd) HH (2nd) MEM 23 [S10] 00 
26 [Sto] 01 3 [S10] 2 [sto] 03 
is 


5 {sto} 4 [Cir] inv) [ssr) 


Initializes registers to be 
used in storing data and 

computing probable market 
shares. 


2nd) HOH (A) [Sto] [2nd] BEE 0 
MH 20 [R) 


(8 [sto] [2nd] OH | 
(2nd) MU 21 [R/S] 


Stores market shares. 


Stores transition matrix. 


057 


pr 
(2nd) ME CC) (2nd) 
(STO) (2nd) SM 04 


[<] (Ret) (2nd) AH 
TH 4 (2d) MOM 20 Grd) MEM 21 
ros 


(2nd) BEM 2 [2nc) Ba 


23 [STO] (0 3 [STO] 2 [2nd] 
{CLR} [sto] [2nd] MR 4 3 
[2nd] BGM 3 (sto) (2 5 [sto] 04 
23 [sto] 00 


Computes probable market 
shares for the next period. 
| Stores them in Ros—Ro:. 


i) 
is) 
3 
8 
2 & 
| wpe 
—) 
be 
= (3) 
a 
—) 
~G 


Recalls probable market 


shares for this period and 
stores them in Ra. - Ras. 


Displays probable market 
shares for next period. 


(2nd) MEM CE) 33 (2nd) MO 2 (A) 8 
[sto] O1 1 [STO] 20 sto] 21 
[sto] 22 


Bi 
bo 
a 


[2nd] WOM [2nd] 
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Initializes ML-02. Stores b, 
values in Rup - Rez for solving 
system of equations. 


Stores values of matrix to be 
used in ML-02 to solve the 
system of equations to find 
the equilibrium market 
shares. 
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Markov ANALYSIS 


Step # | Program Keystrokes 


Purpose/Comments 


(iR} (2nd) ON 2 (Cc) [zt] 0 
(2nd) EE (xX) (CR) (2nd) GO 2 (E) 
20 [Sto] 00 


Calls ML-02 to solve the 
system of equations. If the 
determinant equals 0, no | 
| 
i 


solution exits and a flashing 
display will result. 
Displays equilibrium 
market share values. 


Subroutine used to store 
values of matrix to be used 


in ML-02. 
Exits learn mode. 
Note: Print commands may be omitted if the PC-100A is not used. 
Roo Used 

Ro-Ri ML-02 


R.;-R.; Market Shares 
Ros -R3, Transition Matrix 
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'UsInc THE 
ProcraM 


accuracy. 


Initialize. 


Enter current market 
shares. 

MS, 

MS, 

MS, 
Enter transition matrix 


by columns 
Ti, 


Tss 
Calculate next period’s 
probable market 

shares. 


To calculate another 
future period’s market 
shares, repeat these 
instructions as many 
times as needed. 


2») [x 2) [2 
Re Fee o: 


Calculate equilibrium 
market shares. 


8 


a 
~ 
an 


Note: In this 
calculation some 
intermediate values 
are computed by 
ML.-02 and printed. If 
you are using a 
PC-100A, be sure to 
wait until the entire 
calculation is 
completed before 
continuing. 


°This value is printed if the PC-100A is used. 
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Use the transition matrix and April market shares given in the Facts/Theory 
section to compute the equilibrium shares. The matrix and market shares are 
shown again here for convenience . 


SAMPLE 
PROBLEM 


900 .033  .067 
Transition matrix = | .060 .910  .030 
1050 .125 .825 


April 1 market shares = (.31 AOD 20) 


Display/Comments 


Enter program. 0 
Fix decimal for desired 
accuracy. (We'll use 4.) im 4 0.0000 
Initialize. Lk] 0.0000 
Enter April market 
shares. 
MS, 31 (A) 0.3100 
MS, 49 (4A) 0.4900 
MS, 20 (4A) 0.2000 
Enter transition 
matrix. 
900 0.9000 
.060 0.0600 
.050 0.0500 
.033 0.0330 
.910 0.9100 
125 0.1250 
.067 (8) 0.0670 
.030 (8) 0.0300 
825 0.8250 
Calculate May 1 0.3184 
market shares. R/S 0.4811 
R/S 0.2005 
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Calculate June | 
market shares. 


Calculate equilibrium 
market shares. 


Note: In this 


calculation some 
intermediate values 


are computed by 
ML-02 and printed. If 
you are using a 
PC-100A, be sure to 
wait until the entire 
calculation is 
completed before 
continuing. 


1. Investigate the changes in equilibrium market shares if the marketing 
department uses the following two strategies: 
(a) the company tries to retain more of its own customers. 
(b) the company tries to gain more customers from its competitors. 

. Rewrite the program to calculate the market shares for different numbers 
of companies (other than 3) in the market. 


FURTHER 2 
(PLORATIONS 


2FERENCES/ Master Library, pp. 9-10. 
FORMATION R. I. Levin and C. A. Kirkpatrick, Quantitative Approaches to Management 
(New York: McGraw-Hill Book Company, 1965), chapter 14. 
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7 Economics 


‘ntroduction 


Certain analytical and empirical concepts are important in modern 
economics, and the study of these concepts is usually helped by examples. In 
the case of empirical concepts (those dealing with specific measures of 
economic activities, such as price indexes, unemployment rates, seasonal 
adjustment, rate of growth, cyclical movements, etc.), an example 
representing a reasonably realistic situation can help you to understand the 
advantages and shortcomings of these concepts when you are evaluating 
policies or testing theories. 


In analyzing the application of economic concepts to real-life situations, a 
numerical example may well help you to understand and follow the logic of 
the theory and its application. For instance, the law of variable proportions in 
studies of production and all the rules about short-run cost functions that 
follow from the law are typical of a microeconomic theory in which 
numerical examples point out the utility of the concept and increase your 
understanding of its logic. 


In both these cases you can profit considerably from the use of a 
programmable calculator. These calculations have traditionally been done 
either by using a slide-rule calculator or a computer, but both of these 
methods have disadvantages. The slide-rule calculator does not allow for 
realistic examples because these usually require long, repetitive calculations. 
With a computer “real life” numbers can be used and realistic results 
obtained; however, the whole purpose of the exercise may be lost because it is 
difficult to follow individual steps or at least individual groups of steps in the 
calculations well enough to develop full understanding of the concept. Also, 
involvement in traditional computer programming and card punching 
requires quite a bit of time. On the other hand, if ready-made programs are 
used, you are presented with final results only, thus losing the opportunity to 
see the concept in action and understand its logic and function. 


The advantages of a programmable calculator are its accessibility and 
versatility. It is easy to follow the calculations step by step and see results as 
they are obtained, and repetitive calculations are simplified by the ability to 
enter a program and run it as many times as necessary, changing variable data 
as needed. 


In this chapter we have three examples showing the use of a programmable 
calculator to improve the understanding of empirical concepts. One deals 
with calculating a seasonal index, the second with calculating a reference 
cycle for the latest business cycle, and the third with calculating fluctuation 
around a trend line. In all of these examples the advantage of avoiding long, 
repetitive arithmetic calculations is clear. 
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In theory courses analytical concepts are introduced and sometimes 
accompanied by numerical examples to stress the meaning of the implied 
relationships involved. The numerical examples in this case call for repetitive 
solutions of one or several equations, substituting consecutive numbers as 
independent variables. Again, this is a time-consuming task for a slide-rule 
calculator or an impersonal grinding of results when a computer is used. The 
advantage of a programmable calculator here is that the actual calculations 
can be done right in the classroom or in the field without much loss of time. 
The possible effects of changes in the parameters of the respective equations 
can also be studied without rewriting the program or queuing up for the use 
of the computer. 


Two examples of this type are also included in the chapter. One is a 
numerical example to explore the effects of the interaction of the investment 
multiplier and the accelerator on the cyclical growth of the economy. The 
other is an example of a short-run production function and the various cost 
functions that follow from it. In both cases actual figures are generated 
quickly once the constants of the equations have been decided on, and you 
can easily follow the direction and magnitude of change in the dependent 
variables. 
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neasonal Index 
Ratio to Centered Average) 


(OpjectiVvE 


Facts/ 
Tuerory 


Most monthly economic data, when published, are “seasonally adjusted.” To 
understand better the meaning of the seasonal adjustment and its precision as 
a measure of the effect of the “season” on particular time series, one should 
attempt to do an actual calculation of a seasonal index. Such calculation 
consists essentially of two steps. The first step involves a large number of 
repetitive operations, while the second step implies certain value judgments 
depending on the results of the first step. Because of the time it usually 
requires to finish the first step, a seasonal index is seldom calculated in the 
classroom, but a programmable calculator allows for relatively fast 
completion of the first step and thus can give you actual experience in what 
kinds of value judgments are required in the second step. 


The first step in the construction of a seasonal index is to calculate the ratios 
of actual values to centered averages for each month of a time series. We do 
this by first finding the weighted 13 months’ average centered at a given 
month. Algebraically, this procedure may be expressed as 

ee. ot2(x_,+x p$X_gtX2$X1 +X + X_ X53 +X, +X5 +X 5) +X, 

ik 24 
where Xx, is the weighted centered average for month x, (x_, to x_, are the six 
months preceding month x,, and x, to x; are the six months following month x,). 


Then we divide the actual value for x, by its centered average to find the 
ratio for month x,, multiplying the result by 100 to convert the ratio into 
standard form: 


For one year (twelve months) we need 12 ratios of actual values to the 
centered average. This ratio is supposed to approximate the relative effect of 
the season. To improve the measure of this effect by eliminating irregular as 
well as possible cyclical effects that are present in the ratio, we need more 
than one year’s experience. Probably ten years, meaning altogether 120 
monthly ratios, should be used in the calculation. This implies 120 centered 
weighted averages and their ratio to actual values — clearly a long, tedious 
calculation. 


The second step in the calculation of a seasonal index requires the best 
utilization of the information obtained in the first step. This could be done by 
discovering a possible trend in the seasonal effect over time, identification of 
extreme values of the ratios due to specific irregular effects such as strikes, 
etc. Finally, the decision has to be made as to how one seasonal index (ratio 
X 100) is selected. Usually it will be an average of all or selected individual 
ratios, etc. 
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The following program allows you to input your original data and calculate 
the monthly ratios. The first segment of the program evaluates the above 
formulas, based on 13 months’ data stored in memory registers 1 through 13. 
The second portion automatically advances the stored data by one memory 
register, making it necessary for you to enter only one new month’s data each 
time you run the program. 


The program will store a maximum of 15 calculated results in the 

TI Programmable 58 and a maximum of 45 results in the TI Programmable 59 
without repartitioning. If you are calculating ratios to centered averages 
beyond these levels, remember to repartition the data storage and program 
storage registers appropriately before entering the program. (See pages V-22, 
29, and 42 in Personal Programming for a discussion of repartitioning.) 


Program Keystrokes 


OFF/ON ER) 


Purpose/Comments 


Clears calculator and enters 


bt learn mode. 
[2nd] 1 a) Calculates monthly ratio to 
Re) 2 Rel) 3 Ret] 4 centered average. 
5 6 
7 (4) Ro 8 &) Ro 9 G&G) Note: The [St0} (nd) MN 14 
ll 12 key sequence commands the 


EH] 
a 
HH 


program to store the generated 
data in the memory location 
contained in memory 14. 


o 
Rie Hy 


gelly 
gl 
Bee 
= Bl 
ys = 
fl 
S 
(=) 


— 
i= 


13 Stores new monthly data in 

fa 11 i 10 memory 13 and rolls previously 
9 8 stored data forward one 

ual 7 ual 6 memory location. Then sums | 
5 4 to memory 14 for next indirect 
ial 3 ia 2 storage of generated ratio. 
011 SM 14 


SPEER EEN A > (OES 


ore 


Note: Print commands may be omitted if the PC-100A is not used. 


Exits learn mode. 
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RREGISTER Roo Ri Used Reo (remaining 
Céontents Ry, Used R,, Used R.,; memories 
Roz Used R,. Used R.. used as 
R,; Used R,; Used R., needed 
Ro, Used R,, Used R:, for storage 
R,; Used Rig 3; R.; of generated 
Ros Used Ris & R., ratios) 
Ro; Used Ry; 1s R2; 
Ros Used Kys Ta Ros 
Rog Used Ris Ts Ros 


Procedure Display/Comments 


Clear memories and set 
decimal place for desired 
| 1Usinc tue | | accuracy. Cis 0. 
| Procram Hi 2 0.00 


Enter data for first 13 data 01 data 
months in memory data 02 data 
registers 1 through 13. data 03 data 
data 04 data 
data 05 data 
data 06 data 
data [S10] 07 | data 
data 08 data 
data 09 data 
data 10 data 
data 11 data 
data 12 data 
data 13 data 


Enter 15 in memory 

register 14, 15 14 15. First generated ratio 
will be stored in 
memory register 15; 
second in memory 
16, third in 
memory 17, etc. 


Calculate ratio to 
centered average for first 
month. (Gtored in memory 
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Enter 14th month’s data, 
roll data forward, and 
calculate next ratio. 


Display /Comments 


data ratio,° (Stored in memory 16,) 


Enter 15th month’s data, 
roll data forward, and 
calculate next ratio. 


data 


ratio;° (Stored in memory 17.) 


Continue above 
procedure until all ratios 
have been calculated. 


°This value is printed if the PC-100A is used. 


The monthly ratios may be recalled from memories as needed, beginning with 
register 15. 


Using the following monthly production data, calculate ratios to centered 
averages for January-December, 1976.° 


July ’75 114.5 July 76 126.0 

oe Aug. °75 121.4 Aug. °76 131.7 
Sept."75 -125.9 Sept.’76 134.6 
" Oct. °75 125.4 Oct. ’76 134.0 

Nov. °75 123.8 Nov. 76 132.2 

Dec. ’75 119.8 Dec. ’76 128.1 

Jan. ’76 122.1 Jan. °77 128.4 

Feb. '76 127.9 Feb. °77 133.6 

Mar. '76 128.6 Mar. °77 135.9 

Apr. ’76 128.7 Apr. 77 136.2 

May ’76 129.9 May °77 137.4 

June ’76 133.5 June ’77 141.8 


°Unadjusted Index of Industrial Production for 1975 and 1976 is from Survey 
of Current Business, U.S. Department of Commerce, Washington, D.C., 
Volumes 56 (August 1976) and 57 (August 1977) respectively, p. S-4. 
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Ratio TO CENTERED AVERAGE) 


Procedure 


Display /Comments 


Enter program. 


Clear memories and fix | Cos | 
decimal at 2 places. Mm 2 
Enter data for first 13 
months. 
July 1975) 114.5 ol 
Aug. 1975) 121.4 02 
Sept. 1975) 125.9 03 
Oct. 1975) 125.4 04 
Nov. 1975) 123.8 05 
Dec. 1975) 119.8 06 
122.1 07 


Feb. 1976) 


127.9 08 


Mar. 1976) 128.6 09 
Apr. 1976) 128.7 10 
May 1976) 129.9 11 


June 1976) 


( 
( 
( 
( 
( 
( 
(Jan. 1976) 
( 
( 
( 
( 
( 
(July 1976) 


133.5 12 
126 13 


Enter 15 in memory 14. 15 14 
Calculate ratio for Jan. 
1976. (A) 


Enter next month’s data 
(Aug. 1976), and 
calculate ratio for Feb. 
1976. 


Enter next monthly data 
(Sept. 1976), and 
calculate ratio for 
March, 1976. 


EcoNoMIcs 


131.7 


134.6 
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FURTHER 
EXPLORATIONS 


REFERENCES / 
INFORMATION 


SEASONAL INDEX 
(RaTIO TO CENTERED AVERAGE) 


Repeat the above procedure until ratios have been calculated for twelve 
months (January through December 1976). The following results will be 
generated. 


Month (1976) Ratio to Centered Average Memory Register 
January 97.21 15 
February 101.10 16 
March 101.02 17 
April 100.53 18 
May 100.91 19 
June 103.15 20 
July 96.90 21 
August 100.89 22 
September 102.69 23 
October 101.75 24 
November 99.91 25 
December 96.33 26 


1. Calculate seasonal indexes, using the monthly ratios to centered averages 
over a period of several years. Each August issue of the Survey of Current 
Business, published monthly by the U.S. Department of Commerce, 
provides data on unadjusted indexes of industrial production for the 
previous twelve months (July to June). These averages can then form a basis 
for selection of an actual seasonal index. The selection procedure may 
imply a test for trend in the ratios for individual months, the calculation of 
simple averages, or the calculation of modified averages. 


2. Prepare a program to calculate seasonal indexes based on quarterly data, 
rather than monthly data. 


Seasonal indexes are discussed in many textooks. A detailed explanation of the 
calculation and use of seasonal indexes is presented in Frederick E. Croxton 
and Dudley J. Cowden, Applied General Statistics, 2nd ed. (Englewood Cliffs, 
N.J.: Prentice-Hall, Inc., 1960), pp. 320-364. 


of ae a ee ee ee ee ee ee ee 
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ieference Cycle 


ODByECTIVE 


Facts/ 
THEORY 


Studying the behavior of different time series during business cycles may be 
useful for forecasting, evaluating current situations, or simply understanding 
economic relationships better. For comparisons of the behavior of various 
time series during the same business cycle or the same time series during 
different business cycles, data should be converted to a standard form which 
describes each time series in terms of nine reference values. 


The calculations necessary to convert data into the standard form can be very 
time consuming. However, when you need information about how several 
time series behaved during the same cycle in general economic activity, your 
programmable calculator can help to reduce calculation time. 


Each of the nine “points on the reference cycle” is a partial average relative 
to the arithmetic mean value (x) of the whole cycle. The first point is the 
mean of three observations — the month preceding the trough, the trough, 
and the month following the trough — divided by the mean value of all 
observations from the trough to the next trough and multiplied by 100. 


> x, 


Point 1= 2 x 100 
3x 


The second, third, and fourth points are averages of the first, second, and 
third thirds of the expansion phase of the cycle. (The algebraic notation used 
here refers to the reference cycle 1973-1975 only. For other cycles, the 
number of observations in each third of the expansion and contraction phases 
would be different.) 


Xj 
Point2= ~joz~ X 100 
>a ae 
Point 3= 195 x 100 
36 x, 
Point 4= 19x x 100 
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The fifth point is the three-month centered average of the peak month, and 
the next three points are again averages representing the first, second, and 
third thirds of the contraction phase of the cycle. 


Point 5= — —__ X 100 
3X 
> x, 
Point 6= “__ x 100 
6x 
47 
>, * 
Point 7 = =. X 100 
5x 
53 
>,, *! 
Point 8= 4 __ x 100 
6x 


Finally, the ninth point is the centered average of the second trough of this 
particular reference cycle. 


Point 9= = x 100 


The arithmetic mean of the time series for the whole reference cycle is 
expressed as: 


Zs 


53 


x= 


The program included here can be used to calculate the standard form of the 
last full business cycle (November 1973-November 1975) for any time series 
available monthly, in seasonally adjusted values. Our example problem 
calculates the nine points on the reference cycle for the Index of Industrial 
Production. For notation, Xo, x1, X2 . . . X54 are used to represent the monthly 
values of the time series from October 1970 to April 1975. 


Eee Se ee eee oe ee eee. | 2 eg 
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Program Keystrokes 


OFF/ON 


Purpose/Comments 


Clears calculator and enters 
learn mode. 


EGE [inx)] 1 SUM 0 Counting subroutine for x; 
[Ret] @ [INV] [SBR] entries. 


The next 9 subroutines are 
summation routines for entry 
of x, through x;3. 


FProcraM 


(2nd) MO CE] SUM 5 SUM 6 
(SaR] [inx] [R/S] 


(2nd) HM (2nd) WE SUM G 
(SaR] [Inz] [R/S] 


[2nd] WM [2nd] GE (SUM 7 
[SBR] [Inx] [R/S] 


ss 6 
(= 19 
«(a a 
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Program Keystrokes Purpose/Comments 


Calculates point 5. 


Calculates point 6. 


The remaining subroutines 
are used within subroutine 
HH to provide proper divisor 
for calculation of each point. 


REGISTER Roo Entry counter R,, Used Ryo. R,,; Point 5 
ConTENTS R,., Used R,, Used R,, Point 1 R,. Point 6 
Ro. Used R,; Used R,. Point 2 R,; Point 7 
R,; Used Ro; Used R,,; Point 3 R,, Point 8 
R,, Used Ry» Used R,, Point 4 Ry Point 9 


fen re a ee ee ee 
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iFERENCE CYCLE 


Clear memories and fix We'll use two-place 
decimal for desired decimal setting for 
display format. En convenience. 
Enter monthly data x, Xo 01 Xo These data are not 
and xs,. Xo4 09 Xi included in finding x. 
Enter x, and x». x, (AJ 1.00 Summed into memories 1 
x, AJ 2.00 and 2. Note that the 
program counts the x; 
entries. 
Enter x, through x,2, x, (8) 3.00 Summed into memory 2. 
pressing after % 4.00 
each entry. sees ae 
Xue 12.00 
Enter x,, through x24, X13 13.00 Summed into memory 3. 
pressing after Xie 14.00 
each entry. pig sas 
Xo4 24.00 
Enter x,, through x,5, X,, (2) 25.00 Summed into memory 4. 
pressing (2) after Xe_. (BI 26.00 
each entry. Sins sexs 
x,; @ 35.00 
Enter X,,. X36 36.00 Summed into memories 4 
and 5. 


Enter x3; and x3. 


Enter x3, through x42. 


Enter x,; through x,;. 


Economics 


X37 CE] 


37.00 


Summed into memories 5 
and 6. 


Summed into memory 6. 


Summed into memory 7. 
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REFERENCE CYCLE 


Display /Comments 


Enter x,, through x;;. 48.00 Summed into memory 8, 
49.00 
50.00 


51.00 


52.00 Summed into memories! 


Xss Lo 53.00 and 9. 


Calculate arithmetic LE) Point 1° 
mean (stored in Point 2° 
memory 10) and Point 3° 
the nine points on the Point 4° 
reference cycle. Point 5° 
Point 6° 
Point 7° 
Point 8° 
Point 9° 


Enter x;2 and x;3. 
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Using the following time series, calculate the nine points on the reference 
cycle for November 1970 through March 1975.° 


Oct.’70 = 103.7 Apr. °72 112.8 Oct.’73 127.0 

‘Suni Nov.’70 102.6 May ’72 113.2 Nov.’73 127.5 
Want ax: Dec.’70 = 104.6 June '72 114.4 Dec.’73 =: 126.5 
Jan. ’7] 105.3 July °72 115.1 Jan.’74 125.5 

Feb.’71 — 105.7 Aug. "72 116.3 Feb.’74 = 124.7 

Mar.’71 —-105.5 Sept. ’72 117.6 Mar.’74 124.7 

Apr.’71 = 106.2 Oct. ’72 119.2 Apr.’74 = 124.9 

May’71 ~——:107.4 Nov. °72 120.2 May’74 = 125.7 

June’71 ~—:107.4 Dec. 72 121.1 June’74—s- 125.8 

July 71 106.8 Jan. °73 122.2 July’74 125.5 

Aug.’71 = 105.6 Feb. ’73 123.4 Aug.’74 125.2 

Sept.’71 107.1 Mar. °73 123.7 Sept.’74 125.6 

Oct.’71 = 106.8 Apr. 73 124.1 Oct.’74 124.8 

Nov.’71 107.4 May 73 124.9 Nov.’74 121.7 

Dec. 71 —-108.1 June °73 125.6 Dec.’74 = 117.4 

Jan. °72 108.7 July °73 126.7 Jan.’75 113.7 

Feb.’72 110.0 Aug. “73 126.4 Feb.’75 111.2 

Mar.’72 111.2 Sept. 73 126.8 Mar.’75 110.0 

Apr.’75 —-109.9 


°Seasonally adjusted Index of Industrial Production is from Survey of Current 
Business, U.S. Department of Commerce, Washington, D.C., Vols. 51-56, p. 
S-4 in each issue. 


Enter program. 


Clear memories 

and fix decimal. 

Enter data for i Note that x, and xs, 
Oct. 1970 (xo) must be entered before 


running program. 
Enter data for 109.9 09 
April 1975 (x;,). 


Enter data for Nov. | 102.6 [4] ; The program counts the 
1970 (x,) and Dec. 104.6 (AJ ; entries for you. 
1970 (xz). 
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fd 


REFERENCE CYCLE 


Procedure 


Enter data for Jan. 
1971 (x;) through 


Display /Comments 


105.3 (8) 


105.7 4.00 


Oct. 1971 (x12). sme 08 
(Press after 106.8 12.00 
each entry.) 
Enter data for Nov. | 107.4 [CJ 13.00 
1971 (x,;) through | 108.1 [2] 14.00 
Oct. 1972 (x»,). = ae 
(Press after 119.2 [c) 24.00 
each entry.) 
Enter data for Nov. | 120.2 (2) 25.00 
1972 (x25) through 121.1 (2) 26.00 
Sept. 1973 (x;5). ee ens 
126.8 [0] 35.00 
Enter data for Oct. | 127 36.00 Note that this data point 
1973 (X36). requires special entry. 
Enter data for Nov. | 127.5 [EJ 37.00 
1973 (xj;) and Dec. | 126.5 CEJ 38.00 
1973 (x35). 
Enter data for Jan. 125.5 Ew | 39.00 
1974 (x3) through Pee see 
Apr. 1974 (x,2). 124.9 Hw | 42.00 
Enter data for May | 125.7 EE | 643.00 
1974 (x,;) through Se ae% 
Sept. 1974 (x:). 125.6 Ged) MO | 47.00 
Enter data for Oct. 124.8 a | 648.00 
1974 (x,s) through hiss 
Jan. 1975 (x). 113.7 Mm | 51.00 
Enter data for Feb. | 111.2 MH | 52.00 
1975 (x52) and Mar. 110 | | 53.00 


1975 (xs). 


All data have now been entered. You are ready to calculate the arithmetic 
mean and the nine points on the reference cycle. 
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EIFERENCE CYCLE 


FFURTHER 
PPLORATIONS 


FFERENCES / 
ORMATION 


Calculate points: 


Point 1. 
Point 2. 
Point 3. 
Point 4. 
Point 5. 


Point 6 
Point 7. 
Point 8. 
Point 9. 
If the arithmetic 
mean is needed, 
recall from memory. 


ARSRRRRRTE 


— 
o 


Eo 


Display /Comments 


Memory 11. 
Memory 12. 
Memory 13. 
Memory 14. 
Memory 15. 
Memory 16. 
Memory 17. 
Memory 18. 
Memory 19. 
Arithmetic mean. 


It may be desirable to make comparisons of the behavior of a particular time 
series during different cycles. For that you'll need to write a new program for 
each business cycle. The timing of post-WW II cycles has been identified by 


the National Bureau of Economic Research as follows: 


Trough 

Oct. 1945 
Oct. 1949 
May 1954 
Apr. 1958 
Feb. 1961 
Nov. 1970 


Peak 

Nov. 1948 
July 1953 
Aug. 1957 
Apr. 1960 
Nov. 1969 
Nov. 1973 


Trough 

Oct. 1949 
May 1954 
Apr. 1958 
Feb. 1961 
Nov. 1970 
Mar. 1975 


Duration (months) 


The method described here was developed by the National Bureau of 
Economic Research and is discussed in detail in various texts dealing with 
business cycles, specifically in R. A. Gordon, Business Fluctuations (New 


York: Harper & Brothers Publishers, 1961), pp. 265 ff. 
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Facts / 
THEORY 


Fluctuation Around the Trend Line 


In addition to the Reference Cycle method discussed earlier, another way to 
identify and measure the cyclical movement of a time series is to calculate 
the percentage differences of actual values from values projected along a 
trend line. This method is preferable to the Reference Cycle analysis when 
you are studying longer time periods and looking for different cycles 
superimposed on each other. The following program calculates both the trend 
line and the percentage deviations. 


It is usually assumed that any economic time series is an aggregate of 
seasonal, cyclical, trend, and irregular movements. To study the movements it 
is useful to separate the time series into the individual components. Usually 
the seasonal effect is identified and subtracted first. Then the trend is 
calculated and subtracted. The values that remain are the cyclical and 
irregular effects on the time series. The irregular effects may be then 
“averaged” out to obtain the cyclical effect as a residual. 


Certain assumptions must be made about the type of trend present in the 
time series. For economic aggregates such as GNP, Employment, 
Consumption, Investment, etc., it is common to assume a trend described by a 
constant percentage growth over time — specifically, a straight line fitted to 
logarithmic values of the aggregate. The estimating technique used is usually 
the least square method applied to time as the independent variable and the 
values of the aggregate as the dependent variable. 


Once the trend line has been calculated, the fluctuation around the trend is 
commonly measured as the percentage deviation of an actual value from its 
trend value. This is expressed as 
V, 
—1) x 100 
(We =1) 
where V, =the actual value of the aggregate in time t, and 
V,. =the trend value of the value in time t. 


The first part of the following program is a data-loading subroutine for 
calculation of the trend line. The second part calculates the percentage 
deviation of the actual value from the trend value. 


oS eee eee eee ee eee eS ee ee ee ee 
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LUCTUATION AROUND THE TREND LINE 


Clears calculator and enters 


Tue learn mode. 


[PROGRAM 


Stores year in memory 7 and 
initializes linear regression 
routine. 


Calculates percentage 
deviation. 


Exits learn mode. 


Note: Print command may be omitted if the PC-1OOA is not used. 


REGISTER Raa R,; Used 

Jontents R,, Used Ros Used 
Ro. Used R,; Year 
Ro; Used Ros Ve 
Ry, Used Ros 
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7 


SAMPLE 
PROBLEM 


FLUCTUATION AROUND THE TREND LINE 


°This value is printed if the PC-100A is used. 


nth year 


nth year 


Select decimal setting 
for desired accuracy. 


Enter first year (t) for 
both subroutines and 
initialize. 
Enter aggregate values. 
Ist year 
2nd year 
3rd year 


Calculate percentage 
deviations. 

Ist year 

2nd year 

3rd year 


0.00 


We'll use two-place decimal 
for convenience. 


Calculate the percentage deviations from a trend line of Gross National 


Product in constant prices for 1946 to 1975°: 


Year 
1946 
1947 
1948 


GNP 
477.0 
468.3 
487.7 
490.7 
533.5 
576.5 
598.5 
621.8 
613.7 
654.8 


Year 
1956 
1957 
1958 
1959 
1960 
196] 
1962 
1963 
1964 
1965 


mo 


GNP 
668.8 
680.9 
679.5 
720.4 
736.8 
755.3 
799.1 
830.7 
874.4 
925.9 


Year 
1966 
1967 
1968 
1969 
1970 
1971 
1972 
1973 
1974 
1975 


GNP 

981.0 
1007.7 
1051.8 
1078.8 
1075.3 
1107.5 
171.1 
1235.0 
1214.0 
1191.7 


°These figures are from Economic Report of the President 1977, United States 
Government Printing Office, Washington, D.C., 1977, p. 188. 


Economic 


LLUCTUATION AROUND THE TREND LINE 


Enter program. 


Set decimal at two 
places. 
Enter first year for 
both subroutines. 
Enter data. 

Ist year 

2nd year 

3rd year 


30th year 


Calculate percentage 
deviation. 

Ist year 

2nd year 

3rd year 


30th year 


The full results are: 


Wm 2 
1946 [A] 
477 (8) 

468.3 [8] 


487.7 (8) 


1191.7 (8) 


477 
468.3 [C] 
487.7 (C] 


1191.7 (CJ 


Year % Deviation Year % Deviation Year % Deviation 
1946 2.44 1956 1.18 1966 4.54 
1947 — 2.89 1957 — 0.54 1967 3.68 
1948 — 2.35 1958 —4.16 1968 4.50 
1949 —5.13 1959 — 1.89 1969 3.49 
1950 —0.41 1960 -3.11 1970 — 0.40 
1951 3.91 1961 — 4.10 1971 —0.95 
1952 4.16 1962 — 2.03 1972 1.13 
1953 4.49 1963 — 1.67 1973 2.98 
1954 — 0.42 1964 — 0.06 1974 — 2.26 
1955 2.59 1965 2.18 1975 — 7.36 
Economics 7-21 


a a a 
FLUCTUATION AROUND THE TREND LINE 


1, When the calculation of the percentage deviation from the trend is 
completed, a moving average should be obtained to see the possible 
existence of major and minor cycles. The moving average calculation is 
described in Master Library, p. 58. 


FURTHER 
EXPLORATIONS 


ro 


. Identify cyclical movement around the trend for the Gross National 
Product for the last 88 years. The data are available in Long Term 
Economic Growth 1860-1965, U.S. Department of Commerce, Washington, 
D.C., 1966, pp. 166 and 167, for the years 1889 to 1953, and in Economic 
Report of the President 1978, United States Government Printing Office, 
Washington D.C., 1978, p. 258 for 1953 to 1977. 


ReFereNces/ Master Library, pp. 6-8. 
InrormaTion Personal Programming, pp. V-39,40. 
See any textbook dealing with business cycles, such as: R. A. Gordon, Business 
Fluctuations (New York: Harper & Brothers Publishers, 1961), pp. 253-237. 
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[nteraction of Multiplier 
und Accelerator 


The accelerator model of business cycles is discussed today in every textbook 
on macroeconomic theory. The original article introducing the mathematical 
presentation of the idea is by P. Samuelson, “Interactions Between the 
Multiplier Analysis and the Principle of Acceleration,” The Review of 
'Osjective | Economic Statistics, No. 2, May 1939. Your calculator and the following 
program can be used to demonstrate the sensitivity of the model to changes in 
the parameters in the equation or to different levels of the initial disturbances. 


The theory is that the combined effects of the Keynesian multiplier and the 
investment accelerator may lead to cyclical growth in economic activity. 


The underlying assumptions of the theory are that consumers’ expenditures 
are a constant function of income, while the business investment is influenced 
by growth of spending by consumers. It means that if there is an increase in 
autonomous expenditures in the economy, coming either from the 
government or from the business sector, personal incomes will increase, 
leading to an increase in consumer spending. This, of course, requires larger 
production of consumer goods. The business sector will try to adjust its capital 
stock to meet the larger demand. That means an increase in investment. But 
higher investment expenditures will imply higher incomes of those who 
produce the capital goods and also higher spending by them on new consumer 
goods. This process then may lead to explosive growth. 


There is an upper limit, however, on total output in the short run which 
ultimately prevents the production from meeting the new demand. 
Retardation of growth, then, implies a decline in business investment, since 
less additional capital is needed. Lower investment means lower incomes for 
producers of investment goods and, consequently, lower spending on 
consumer goods, and thus the process of contraction starts. Again, this process 
will finally reverse itself because there is a lower limit on disinvestment, that 
is, the downwards adjustment of the capital stock. This limit is given by the 
value of capital depreciation. 
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eee: 
FLUCTUATION AROUND THE TREND LINE 


1, When the calculation of the percentage deviation from the trend is 
completed, a moving average should be obtained to see the possible 
existence of major and minor cycles. The moving average calculation is 
described in Master Library, p. 58. 


FuRTHER 
EXPLORATIONS 


is) 


. Identify cyclical movement around the trend for the Gross National 
Product for the last 88 years. The data are available in Long Term 
Economic Growth 1860-1965, U.S. Department of Commerce, Washington, 
D.C., 1966, pp. 166 and 167, for the years 1889 to 1953, and in Economic 
Report of the President 1978, United States Government Printing Office, 
Washington D.C., 1978, p. 258 for 1953 to 1977. 


ReFERENCES/ Master Library, pp. 6-8. 
INFORMATION Personal Programming, pp. V-39,40. 
See any textbook dealing with business cycles, such as: R. A. Gordon, Business 
Fluctuations (New York: Harper & Brothers Publishers, 1961), pp. 253-257. 
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Interaction of Multiplier 
md Accelerator 


ODBJECTIVE 


| Facts/ 
“THEORY 


The accelerator model of business cycles is discussed today in every textbook 
on macroeconomic theory. The original article introducing the mathematical 
presentation of the idea is by P. Samuelson, “Interactions Between the 
Multiplier Analysis and the Principle of Acceleration,” The Review of 
Economic Statistics, No. 2, May 1939. Your calculator and the following 
program can be used to demonstrate the sensitivity of the model to changes in 
the parameters in the equation or to different levels of the initial disturbances. 


The theory is that the combined effects of the Keynesian multiplier and the 
investment accelerator may lead to cyclical growth in economic activity. 


The underlying assumptions of the theory are that consumers’ expenditures 
are a constant function of income, while the business investment is influenced 
by growth of spending by consumers. It means that if there is an increase in 
autonomous expenditures in the economy, coming either from the 
government or from the business sector, personal incomes will increase, 
leading to an increase in consumer spending. This, of course, requires larger 
production of consumer goods. The business sector will try to adjust its capital 
stock to meet the larger demand. That means an increase in investment. But 
higher investment expenditures will imply higher incomes of those who 
produce the capital goods and also higher spending by them on new consumer 
goods. This process then may lead to explosive growth. 


There is an upper limit, however, on total output in the short run which 
ultimately prevents the production from meeting the new demand. 
Retardation of growth, then, implies a decline in business investment, since 
less additional capital is needed. Lower investment means lower incomes for 
producers of investment goods and, consequently, lower spending on 
consumer goods, and thus the process of contraction starts. Again, this process 
will finally reverse itself because there is a lower limit on disinvestment, that 
is, the downwards adjustment of the capital stock. This limit is given by the 
value of capital depreciation. 
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ae 
INTERACTION OF MULTIPLIER 
AND ACCELERATOR 


The definition of total expenditures in the economy is: 
YY, = C,+1,+G, 


where Y, = sum of expenditures on new production during 
period t, 
C, = consumer expenditures during period t, 
I, = business expenditures during period t, and 


9 
i 


government expenditures during period t. 
It is assumed that: 


C, = aY,-; consumer spending is determined by income in the 
previous period and the value of the Propensity to 
Consume (a), 

I, = b(C,—C,_,) business investment depends on change in consumer 
spending from the previous period and the value of 
the accelerator (b), and 

GC, is autonomous and for this model may include 
autonomous expenditures by the business sector. 


Then, by substitution: 

Y, = a(1l+b)¥,-,; —abY-.+G, 
The following program evaluates the model to find successive aggregate 
spending (outputs) for given values of the parameters of the equation. To keep 


the model within realistic levels, we can assume the maximum value of Y=Y-. 
and the minimum value of I=[I,,. 


SINE Dy, 


ok 
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ICTERACTION OF MULTIPLIER 
_NiD ACCELERATOR 


Program Keystrokes Purpose/Comments 


OFF/ON Clears calculator and enters 
learn mode. 
Calculates the value of G, for 
stationary equilibrium. 


Calculates successive values 
of Y,, Y,.,, etc., with no 
limits on Y,, andI,. 


THe 
EPRocRAM 


ae 
a 
RK 
A 


Ife) 8 bl 


a fc) Calculates successive values 
300 ka 4 E&) of Y,, Y,.;, etc., with limits 
1 2E) of Y,, and I,,. Begins by 
[INV] checking value of I,. 


“| 8 
H| o,. 


(2nd) ON If >I, program generates 
3 5 Y, and checks against Yin. 
8 [RCt] 6 [z:t) 

[RCL] § (2nd) EEN [2nc) A 


If Y,<Ym, displays Y,; then 
advances data in memories to 
calculate Y, .;. 


If I,<I,,, program substitutes 
],, and loops back to CE]. 


If Y, >Ym, program substitutes 
Y,,, advances data, and loops 
back to calculate Y, .;. 


Exits learn mode. 


Note: Print commands may be omitted if the PC-100A is not used. 


ma 


2 Be 
a5 
Fy 
lag 


: 
E 
: 
fg 
- 


Ga 
ASG 


E 
fi 


IRECISTER Ry Rs Gi 

(Contents R, a Ros Ym 
Roz b Ro; In 
Ros Ye Ros Used 
Roy Yr -2 Ros 
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UsING THE 
PROGRAM 


SAMPLE 
PROBLEM 


EY 
INTERACTION OF MULTIPLIER 
AND ACCELERATOR 


Procedure Display /Comments 


Enter given data. a 
b 0) 
Y,_, S70 03 Vives 
Y,_. S10] 04 Y,-2 
Y,, 9) 06 Y.. 
1 


Calculate G,. 
Calculate successive 
values of Y, with no 
limits (continue to press 
for successive 
values), 

or 
Calculate successive 
values of Y, with limits. | RS 


Y,° No limits. 


5) I | Ee 


Y,° With limits of 
Yeo Y,,.and 14. 
Yes2” 


°This value is printed if the PC-100A is used. 


Assume the following values: 
a= 0.9 Y,-1 = 1000 Ym = 1500 
b=2 Y,.2= 1000 I, = — 80 


First, solve for the equilibrium value of G,. Next, assume a disturbance 
consisting of a permanent 20% increase in G,, and find Y, for six successive 
periods, first with no limits and then with limits given above. 


Display /Comments 


Enter program. 


Enter data: 
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E\TERACTION OF MULTIPLIER 
=wp ACCELERATOR 


Procedure 


Calculate equilibrium 


iret Display /Comments 


value of G,. CA] 100. Stored in memory 5. 
Enter disturbance 2E) 20. 
(20% increase). SUM 05 
Calculate Y, through 
Y,., with no limits. CB) 
Enter original Y,_, 1000 (S19) 03 } 
and Y,_» values and 1000 04 1000. 
calculate Y, through Cc] 1020. 
cycle with given limits.| B4) 
(Extend beyond R/S 
6 periods to see RA) 
cyclical effect.) RA] 

RA] 

{R/S] 

R/S 


The program can be used to show how different the cyclical development 
would be if the values of the parameters changed. Also, minor adjustments in 
the program can introduce a constant long-term growth rate. Finally, the 
model may be made more realistic by introducing a multiperiod adjustment 
by business to increased demand. This means that the induced investment will 
be spread over two or more periods in the future. 


‘REFERENCES/ As mentioned earlier, the first mathematical presentation of the combined 

‘Inrormation — effect of multiplier and accelerator was published in 1939. Since that time 
most textbooks on macroeconomics have included the model in various forms 
when discussing cyclical growth. See, for example, G. Ackley, Macroeconomic 
Theory (New York: The Macmillan Co., 1967), pp. 485-493. 
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OByjECTIVE 


Short-Run Production 
Function and Cost Curves 


In many courses covering microeconomic theory, the short-run cost of 
production is presented in the form of cost curves developed from a specific 
production function. Algebraic presentation requires not only some 
knowledge of calculus, but also a good understanding and ability to visualize 
the “shape” of a functional relationship. Very often much better 
understanding is obtained when a numerical example is shown. Of course, to 
present a numerical example — the derivation of cost curves from a 
production function, as well as the calculation of various measures of 
productivity — requires quite a bit of time. 


A programmable calculator allows you to generate the successive values 
rapidly and thus grasp better how, for example, diminishing marginal product 
results in increasing marginal and average costs, or why average total cost 
may be U-shaped even when average variable cost never declines. 


In most textbooks, as well as in empirical research, an exponential function 
known as the Cobb-Douglas production function is used as an example of the 
input-output relationship that is characterized by the law of diminishing 
returns.° A standard form of the function may be as follows: 

X = cL*K” 
where X is the level of output, L and K are labor and capital inputs 
respectively, and a, b, and c are constants. 


In our example we assume that L is the variable input, while K is the fixed 
input. Thus output can change only by adjusting employment of labor. This 
functional relationship between output and input is usually presented in the 
form of average and marginal product of labor, as well as average and 
marginal product of capital. 


°See, for example, Edwin Mansfield, Microeconomics: Theory and 
Applications (New York: W. W. Norton and Co., 1970). 
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sHHORT-RUN PRODUCTION FUNCTION 
wnD Cost CuRVES 


The respective concepts are: 
X 
Average product of Labor: 5 ei 


dx a 
Marginal product of Labor: ai acL*~'K® 


Average product of Capital: $= eLtk?=! 


Marginal product of Capital: Pee beLtK 

= output elasticity with respect to L, 
output elasticity with respect to K, 
= technological constant, 

Ww = wage rate (price of L), and 

rate of return on capital (price of K), 


where 


oT f 
ll 


ll 


while all are expressed as a function of L. It is clear that with a and b less than 
one (the expected case), the average and marginal products of labor will be 
declining as employment grows, while the average and marginal product of 
capital will grow for additional employment of labor. 


When deriving cost curves, we assume for the purpose of exposition that input 
prices remain constant during the period in question. The total cost of 


production is defined as: 
TC = wL+rK 


Total cost is also thought of as consisting of variable cost (wL) and fixed cost (rK). 


This simple definition of cost becomes slightly complicated when cost is to be 
described in relation to output rather than to inputs. The transformation of 
the function then requires inclusion of the production function, and variable 


cost becomes x \ 
VC = w(X,} 


Additional information — usually presented in graphical form — that can also 
be derived from the production function we Ae cost curves: 


Marginal cost: “WX aX 
Average Variable cost: AVC = 


Average Fixed cost: AFC= xX 


Average Total cost: ATC= Xie ke. 


| SHORT-RUN PRODUCTION FUNCTION 
AND Cost CurvVES 


We have then ten analytical concepts — five production measures and five 
cost measures — with each of them varying with the level of employment or 
the level of output. The successive values of each of them can be generated 
quickly using the program described below, for any assumed values of the 
functional parameters. 


The concepts: 


Production: Total Output Cost: Total Cost 
Marginal Product of Labor Marginal Cost 
Average Product of Labor Average Variable Cost 
Marginal Product of Capital Average Fixed Cost 
Average Product of Capital Average Total Cost 
Program Keystrokes Purpose/Comments 
OFF/ON [i Clears calculator and enters 


ie learn mode. 

THE a 
Calculates total output (X). 
Note: WE 24 
increments memory register 
4by 1. 


021 OH 2) 1 &) Calculates marginal product 
Rel] 4 ze) of labor (MPL). 

030 Lt | 4 Calculates average product 
(A) of labor (APL). 

037 (2nd) MOH (0) ES Calculates marginal product 
(RCl] 3 [A] of capital (MPK). 
(2nd) MON CE) fre) 3 Calculates average product 
[A] of capital (APK). 

053 a Calculates total cost (TC). 

065 


Calculates marginal cost (MC). 
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‘SHORT-RUN PRODUCTION FUNCTION 
.AND Cost CurvES 


Program Keystrokes Purpose/Comments 


REGISTER 
CONTENTS 


Calculates average variable 
cost (AVC). 


Calculates average fixed cost 
(AFC). Note: End] 26 

increments memory register 
6 by 1. 


EEE 


Calculates average total cost 
(ATC) 


> 


9° =| | 
Eb BS 


(2nd) Eel key Calculates variable cost (VC), 
5 fret] 3 [7*) which is included as a 

20) (RCt] § subroutine in calculations of 
OI 1 TC, AVC, MC, and ATC. 

8 =) MON 26 [inv 


wang 


Note: Print commands may be omitted if the PC-1O0A is not used. 


Roo Ros c 
Rosman Ree os 
Ro» b Ro; r 
Ro; K Ros W 
Ro L Ros 


Economics 7-31 


UsING THE 
PROGRAM 


SHORT-RUN PRODUCTION FUNCTION 
AND Cost CurvES 


Procedure Display /Comments 


Set decimal for desired 
accuracy. 


a 
a 


(We'll use a 4-place decimal 
setting for convenience.) a 


Enter data in memory a Ol a 
registers. b 02 b 
Note: data must be K 03 K 
entered in the designated | L 04 L 
memory registers. c (0) 05 c 
X 06 X 
r 07 r 
, (S10) 08 w 


Production Analysis 
Calculate total output (X) 
based on original labor 
input (L). 

Calculate total output (X) 
based on incremented L. 


X,° Calculates first X and 
increments L by 1. 


x" 


Continue to press [4] to see effects on output caused by increments of 1 in 


labor input. 


Enter original value of L 
and calculate marginal 
product of labor (MPL). 
Calculate new MPL 
based on incremented L. 


MPL,° Calculates first MPL 
and increments L by 1. 


MPL, ° 


Enter original value of L 
and calculate average 

product of labor (APL). 
Calculate new APL. 


APL,° Calculates first APL 
and increments L by 1. 


APL,° 


Enter original L and 
calculate marginal 
product of capital 
(MPK). 


Continue to press [2] to see effects on MPK caused by increments of 1 in L. 
sp MORIA U NAY 50) J SRA AS od lel allele eed Mee he cele a 
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SHorT-RUN PRODUCTION FUNCTION 
aanD CosT CURVES 


Enter original L and 
calculate average 
product of capital 
(APK). 


Cost Analysis 

Calculate total cost. TC,° Calculates total cost and 
Calculate TC based on increments X by 1. 
incremented X (output 

value). 


Enter original value of X X 06 
and calculate marginal ca 
cost (MC). Ha 


Enter original value of X 
and calculate average 
variable cost (AVC). 


Enter original X and 
calculate average fixed 
cost (AFC). 


Enter original X and 
calculate average total 
cost (ATC). 


Continue to press MM to see effects on ATC caused by increments of 1 in 
X, 


°This value is printed if the PC-100A is used. 
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SAMPLE 
PROBLEM 


SHORT-RUN PRODUCTION FUNCTION 


AND Cost CURVES 


Assume a production function of X= 1.2(L‘K“) with a wage rate (w) =3, the 
price of capital (r)=2, and a capital input (K) of 200. For production analysis, 
find total output (X), MPL, APL, MPK, and APK for labor inputs (L) of 300 
through 304. For cost analysis, find TC, MC, AVC, AFC, and ATC for total 


outputs (X) of 320 through 324. 


[ Procedure Press Display/Comments 
Enter program. 0 
Fix decimal. | {2nd} 4 0.0000 
Enter data in memories. | 
(a) | .7 (SO) O01 0.7000 
(b) 3 SO) 02 0.3000 
(K) | 200 [Sto] 03 200.0000 
(L) | 300 (STO) 04 300.0000 
(c) 1.2 [Sto] 05 1.2000 
(X) 320 (ST) 06 320.0000 
(r) 2 [sto] 07 2.0000 
(w) 3 (Sto) 08 3.0000 
[ea 7 : é 
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Procedure 


Production analysis: 


Cree | Display /Comments 


Calculate total outputs 


(X). 
L=300 318.7683 
L=301 319.5117 
L=302 320.2544 
L=303 320.9963 
L=304 321.7376 


Enter original L and 
calculate MPL for each 
value of L. 


300.0000 


0.7438 
0.7431 
0.7423 
0.7416 
0.7408 


Enter original L and 
calculate APL. 


300.0000 
1.0626 
1.0615 
1.0604 
1.0594 
1.0583 


Enter original L and 
calculate MPK. 


300.0000 
0.4782 
0.4793 
0.4804 
0.4815 
0.4826 


Enter original L and 
calculate APK. 


300.0000 
1.5938 
1.5976 
1.6013 

1.6050 

1.6087 
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| SHoRT-RUN PRODUCTION FUNCTION 
AND Cost CuRVES 


Cost Analysis 


Calculate TC for La | 1304.9720 
X = 320 through 324. 
(2nd) GL 1309.0148 
a | 1313.0630 
| a | 1317.1165 
ia 1321.1754 
Enter original X and 
calculate MC. 320 [STO] 06 320.0000 
(2nd) 4.0401 
(2nd) EG 4.0455 
(2nd) BG 4.0509 
(2né) EG 4.0562 
| (2nd) SG 4.0616 
Enter original X and | 
calculate AVC. 320 06 320.0000 
| (2nd) BG 2.8280 
(2nd) BG 2.8318 
| (2nd) BG 2.8356 
ic | 2.8394 
2nd) SG 2.8431 
Enter original X and 
calculate AFC. 320 06 320.0000 
(2nd) A 1.2500 
(2nd) 1.2461 
ra 1.2422 
(2nd) SG 1.2384 
2nd) 1.2346 
Enter original X and 
calculate ATC. 320 06 320.0000 
(2nd) 4.0780 
DEI 4.0779 
|e | 4.0778 
ia 4.0778 
a 4.0777 
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HORT-RUN PRODUCTION FUNCTION 
uND Cost CurvES 


The example presented here may also provide better understanding of the 
effects of change in the parameters of the production and cost functions. For 
example, you can study the effect of technological change simply by 
increasing the value of the constant (c) in the production function. Also, you 
__ FURTHER may change the wage rate (w) to see the effects of wage increases on the 
meen TtONS various cost functions. 


A production characterized by increasing returns to scale can easily be 
introduced by changing the values of a and b, the parameters of the 
production function, so that their sum is larger than 1. Also, the program can 
be redesigned for considerations of long-run production function and costs, as 
well as for different forms of production functions. 


REFERENCES/ A discussion of production functions and the derivation of cost curves is 
FORMATION included in almost every text dealing with microeconomic theory. 
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Introduction 


The historical approach to biology has been largely qualitative. Today’s 
trend, however, is moving toward more and more quantitative measurement 
in various areas of biology. In these areas, mathematical models describing 
biological behavior are being set up and explored in ways that would have 
been virtually impossible before the development of our modern 
computational devices. 


Your programmable calculator can be a powerful tool as you explore and 
discover for yourself the behavior of these mathematical descriptions and 
models. The programmable calculator can not only greatly reduce 
calculation time, but also allows you to search for reasonable alternative 
solutions by trial and error. Thus, you can examine the behavior of a model as 
its input parameters are changed. This type of analysis can give you a much 
more complete picture of all the possibilities of a given expression or set of 
equations describing an aspect of biological behavior. 


The topics covered in this chapter are all areas which have seen increasing 
mathematical emphasis in recent years. Genetics was one of the first areas of 
biology to adopt a quantitative approach, and two examples from this field 
are included here. One is taken from the classical approach of Gregor 
Mendel. The other is a more advanced example involving blood-type 
matching. The study of population behavior is an area which is as 
quantitative a subject as any in biology today. Our example here is a simple 
one which only hints at the mathematical sophistication of models used in this 
field. Finally, since many of the problems in modern biology arise from the 
growing use of physical methods in research, the sedimentation of biological 
molecules has been chosen as a representative application for your 
programmable calculator. 


In a chapter of this size, of course, we can only suggest the many possibilities 
and applications of your calculator. We hope you will explore other problems 
of your own choosing with the help of current literature on the subject of 
mathematics in biology. Two books of interest are listed below. 


The Mathematical Approach to Physiological Problems, by Douglas Shepard 
Riggs. Cambridge, Mass.: M.I.T. Press, 1970. Chapters 5 through 11 provide 
many interesting problems in the advanced area of physiology. 
Mathematical Ideas in Biology, by J. Maynard Smith. New York: Cambridge 
University Press, 1968. This book contains a great deal of material that can be 
handled by the programmable calculator. 
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Genetics 


In Mendelian genetics, dominance determines the character of the second 
generation zygotes. The program included here calculates the probabilities of 
the occurrence of combinations of traits in the second generation of a 
hybridized organism. 


Dealing with one dominant trait S, whose corresponding recessive trait is s, 
and assuming a genetically pure parent generation, the parent zygotes will be 


SS and ss. 


The first generation of hybrids will each have the zygotes Ss and will show 
the trait S. To examine the second generation, all possible genetic 
combinations must be considered. This can be done using a diagram called a 
Punnett Square, as shown here. 


By the principle of dominance, all but the ss zygote will exhibit the dominant 
trait S. Therefore, for the second generation of mono-hybridized organisms, % 
of the organisms display the dominant trait, and 4% display the recessive trait. 


Now consider two dominant traits, S and W, with their corresponding 
recessives s and w. If you wish to calculate the probability of finding the 
combination Sw in the second generation organisms, the formula is 


Psw = PsPw 
where P; = _ the probability of finding S, and 
P, = the probability of finding w. 


We have already established that the probability of finding a dominant trait is 
% and the probability of finding a recessive trait is 4 in the second generation 
of a mono-hybridized organism. Therefore, the probability of Sw is 

% X%4=3/6,or, in general terms: 


Patecrn Sa P.Ph..cFn 


———— SSE 
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If we want the probability of a particular combination of m dominant traits 
for an n-hybrid, we use the formula 
Pr=(%4)™(44)"-™ (equation 1) 
The probability of an n-hybrid having m dominant traits and n—m recessive 
traits is given by the formula 
! 
PP = (%)™(14)?-™ Eres (equation 2) 
The difference in the probabilities can be distinguished by a short example. 
Suppose we have a gamete with two dominant traits A and B and their _. 
corresponding recessive traits a and b. If we want the probability of a second 
generation zygote having the dominant trait A, we would use the first 
probability (equation 1). Similarly, if we wanted the probability of the zygote 
having the dominant trait B, we would use equation 1. However, if we merely 
want to know the probability of the zygote having one dominant trait, either 
A or B but not both, we would use the second probability equation. 


The following program uses both these expressions to explore the 
probabilities of dominant traits appearing in a second generation organism. 
Note that m=n at the beginning of the program, but m is decreased by one 
each time the program loops back to calculate a new probability. 


Program Keystrokes Purpose/Comments 


OFF/ON Clears calculator and 
enters learn mode. 


(2nd) MOE (A) (sto) Q (sto) } Stores n, m, n+1, probability 
of a recessive, and probability 
of a dominant. 


Calculates n—m and transfers 
to Ml, if result=0. 


Calculates and stores (n—m)! 
ifn—m+0. 


Calculates and stores n! (and 
l first m!) 
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| 100 | ed) 1 Gnd) MS) 


138 (2nd) ME CE) 1 (S70) 12 (0) 


276) Serene 


Program Keystrokes 


(2né) MON (2nd) ME 1 (Sto) 13 


HB (23) 


Purpose/Comments 


Stores 1 for (n —m)}, if 
n—m=0. 


Calculates and stores (%4)"X | 
(4)*-™ (probability of a 
particular combination of m_ | 
dominant traits). | 


Completes formula to find 
probability of all possible 
combinations of m dominant 
traits: 


lY,)ja-m ere | 
(%4)"("A) [ae—anl 


Recalls m and stops. 


Recalls probability of specific 
combination of m dominant 
traits, and stops. 


Recalls probability of all 
possible combinations of m 
dominant traits, and stops. 


Checks to see if m< 1. If so, 
transfers to CEJ. If m=], 
calculates and stores new m! 


Decreases m by 1; checks 
register 5 to see if another loop 
is required (program loops 
n+ 1 times). If not, displays 

— 1 and stops. 


Enters 1 for m! if m<]; then | 
transfers back to (2). | 


Exits learn mode. | 


Note: Print commands may be omitted if the PC-100A is not used. 
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| REGISTER Roo 0 R,; Used Rio Pi 
(Contents = R,, m Ro, Used R,, n! 
Ro % Ro: Ri. m! 
Ros 4 Ros Used Ri; (n—m)! 
Rox Ps Ros Ru 


Enter number of m, First number of dominant traits 


traits (n). to be considered. 
WsiNc THE o ay — 
Procram PP Probability of finding all m 


dominant traits in second 
generation of n-hybridized 
organism. 

PP° _- Probability of finding all possible 
combinations of m dominant traits. 


(m—1)° 


P™-'* Probability of finding specific 
combination of m — 1 dominant 
traits. 


P?-'* Probability of finding any possible 
combination of m— 1 dominant 
traits. 

Continue to press 
until all 
probabilities have 
been calculated. 0.° No dominant traits present. 
Py* Probability of 0 dominant traits. 


Pee Probability of 0 dominant traits. 


— 1.  Signifies end of run. 


°This value is printed if the PC-100A is used. 
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Check the results for the di-hybridized system of sweet peas, considering the 
traits of stem length and seed shape. The traits are 


S = long stems, 
: s = short stems, 
AMPLE 7 a p 
Wr = round seeds, and 
w =~ wrinkled seeds. 


(The capital letters indicate dominance.) 


| Display/Comments 


Enter program. 0 

Enter number of | 

traits being 

considered. | 2 (A) 2. The number of dominant traits 
displayed (m). 

RA) 0.5625 Probability of both dominant 
traits present. 
| ks 0.5625 Probability of any possible 

combination of the two dominant 
traits. 


—t 


. The number of dominant traits 
present (m— 1). 


0.1875 The probability of finding S only 
and the probability of finding W 


only (P;). 

0.375 The probability of finding either $ 
or W (P,). 

0. No dominant traits displayed 
(m—2=0). 


0.0625 The probability of finding 0 
dominant traits. 


0.0625 The probability of finding neither‘ 
nor W. 


5 
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Note that P, and P, are always equal where m =n and where m=0. The 
information generated by the program may be charted as follows: 


Symbol Traits Probability 1 Probability 2 
SW Long stem/round seeds .0625 0625 
Sw Long stem/wrinkled seeds 1875 375 
sW Short stem/round seeds 1875 : 
sw Short stem/wrinkled seeds .0625 .0625 


Check the results by making a Punnett Square for this system. 


Sw 
SSWw 


SW 


SSW W 


sW sw 


SsWW 


SW 


Sw SSWw SSww SsWw 


SsWw Ssww ssWw 


SW 


Probability of SW =%, =.5625 
Probability of Sw =%, =.1875 
Probability of sW =, =.1875 
Probability of either Sw or sW=%,=.375 
Probability of sw =. =.0625 


Add a trait to the sweet pea problem; for example, seed color, where yellow 
seeds are dominant and green seeds are recessive. Determine the probabilities 
for all combinations of traits and confirm these results by making a Punnett 


Square. 


W. H. Johnson et al, Biology, 3rd ed. (New York: Holt, Rinehart and Winston, 
1966), pp. 598-607. 

Most introductory biology texts include a discussion of Mendelian and 
non-Mendelian genetics. 
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Blood-Type Matching 


The blood of an individual is typed by the presence or absence of the three 
antigens A, B, and Rh. The donation of blood does not require an exact match 
of blood types between donor and recipient, but the blood of the donor cannot 
have any antigens that are not present in the blood of the recipient. The 
following program examines a simple model of blood-type matching and 
generates the percentages of blood-type matches found in a given population. 


The presence of the A and/or B antigens is indicated by the letters A, B, or 
AB in the blood type, while the absence of both is indicated by the letter O. 
The + sign (positive) shows the presence of the Rh antigen, and the — sign 
(negative) its absence. Thus, type AB+ means that an individual's blood has 
all three antigens; type O— indicates that none of the antigens is present. The 


following chart illustrates blood-type matching for donating or receiving 
blood. 


Donors (Those who can 
donate to blood type) 
A+,0+,A—-—,0O- 
B+,0+,B-,0- 
A+,B+,AB+,0+,A-, 
B-, AB—,O- 


Recipients (Those who 
can receive blood type) 


A+, B+, AB+, O+ 
| B—- | B+,AB+,B—, AB— 


AB+, AB— 


eB 
A+,B+,AB+,0+, 
A-,B-, AB-,O- 


If you know the distribution of the eight blood types within a given populatio: 
you can use the program included here to find the number and percentages of 
eligible donors and recipients for each blood type. For matching purposes in 
the program the blood types are given these numerical codes: 

A+=1 AB+=3 A-=5 AB-#=7 

B+ =2 O+=4 B-=6 O-=8 


Be, O= 
A-,B—, AB-,O- 


If you are using the TI Programmable 58, it will be necessary for you to 
repartition the data/program storage registers before entering the program, 
since it has 254 steps. Repartition by pressing 2 WH 17 before you enter 
the program. This allows you to enter up to 320 program steps, with 20 
memories for data storage. 
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Program Keystrokes Purpose/Comments 


OFF/ON Clears calculator and enters 
learn mode. 


(2nd) MOH (A) [Sto] (2nd) MO 
SUM 10 [2nd] BOM 20 [RS) 


Data-loading subroutine for the 
number of individuals having 
each blood type in the 
population. 


Donor subroutines. 
Tests the blood type being 
matched. If Rh factor is 
negative, program transfers to 
subroutine [4] . If positive, 
program tests for match. If 
blood type is 4 (0 +), finds 
number and percentage of 
donors in the population. 


D 
[2 
Ld 
— 


Tests Rh negative types and 
finds number and percentage of 


2) 
A 
El 
S 
A? By 


x=" a 7 donors if blood type is 8 (O —). 
| x=t Lc 8 

Lo 

| tb) Donors for type 1 (A+). 


OO om 
Eig 


fe 
(2) 
teed 


E 
fl 
fd 


Donors for type 2 (B +). 


Donors for type 3 (AB +). 
Rel] 5 Donors for type 5 (A—). 


~ 

I] 
aD 
(2) 
tad 

lon) 


RCL] § <7 
bi | cs 6 Donors for type 6 (B—). 
8 = 


zl 


Donors for type 7 (AB —). 


HB 
S [2 
& 


a 
lH 
E) 
(o) 
tad 
x 
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| Step # | Program Keystrokes Purpose/Comments 


116 


197 


8-10 


(2nd) EE (2n¢) MG (=) [2nd] 
EE ks =|) ko 10 XX) 100 
(=) So] 09 


(2nd) HH 00 610000 [2nd] 
HE 04 (Rc) 9 [2nd] OH 06 RS) 


~ BBE 
a 


E)t) 


EI 


(EE) 


Finds total number and 
percentage of donors for 
blood type in question. 


Prints percentage and 
percent sign. If you are 
not using the PC-100A 
printer, this segment 
of the program may be 


omitted and replaced by 
a ‘ 


Recipient subroutines. 
Tests the blood type being 
matched. If Rh factor is 
negative, transfers to sub- 
routine . If positive, 
program tests for match. If 
blood type is 4 (O +), finds 
number and percentage of 
recipients in the population. 


Tests Rh negative types and 
finds number and percentage 
of recipients if blood type is 
8(O-). 

Recipients for type 1 (A+). 
Recipients for type 2 (B +). 


Recipients for type 3 (AB +). 


Recipients for type 5 (A—). 


Recipients for type 6 (B—). 


Bro.ocy 
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Program Keystrokes Purpose/Comments 


246 MOE (EE) [Rc] 3 Recipients for type 7 (AB—). 
if Lo : 


Note: Print commands may be omitted if the PC-100A is not used. 


Roo Used R; 2+A- Ry. total population (N) 
Ry A+ Roe +B- Ri, 
Roo Bt R,; 2+AB-— Bis 
R,; 2AB+ Ros O- Ris 
R,, FOt+ Ros Used Ris 
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Display/Comments 
Re, 4 Clear memories. CMs 
= Enter 1 in memory 0. 1 00 Directs program to begin 
data storage in memory 1. 
PROGRAM 
Enter number of 
individuals with each 
blood type. 
A+ [A] n Note that data must be 
=Bt+ [A] n entered in this order. 
#AB+ [A] n 
#=O+ [AJ n 
FA TA) n 
=B- [A] n 
=AB-— [A] n 
=0O- [A] n 
Enter blood-type code 
to be tested and find 
number and percentage 
of donors in the Code n° Number of donors. 
population. %N° % of population. 
Enter blood-type code 
and find data for recipi- Code n° Number of recipients. 
ents in the population. % of population. 
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Assume that all eight blood types are equally distributed within a population 
of forty individuals. Calculate the complete donor/recipient table for each 


blood type. 


Enter program. 


SAMPLE 
PROBLEM 


al 


Clear memories. 
Enter 1 in memory 0. 
Enter data. 


S 
o 


HABE EEE 


Enter blood-type code 
and calculate donors. 
(Repeat for each blood 
type.) 
A+ 1@ 20. Number of donors. 
50. % of population. 
B+ 2 20. Number of donors. 
50. % of population. 
O- 8 5. Number of donors. 
12.5 % of population. 
Enter blood-type code 
and calculate recipients. 
(Repeat for each blood 
type.) 
A+ 1 [¢) 10. Number of recipients. 
25. % of population. 
B+ 2 (ce) 10. Number of recipients. 
25. % of population. 
8 [CJ 40. Number of recipients. 
100. % of population. 
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The complete donor/recipient table will be: 


Blood Type Donors Recipients 
A+ 20 10 
50% 25% 
Bt 20 10 
50% 25% 
AB+ 40 5 
100% 12.5% 
O+ 10 20 
25% 50% 
A= 10 20 
25% 50% 
B= 10 20 
25% 50% 
AB— 20 10 
50% 25% 
O- 5 40, 
12.5% 100% 


It is not realistic, of course, to assume that all blood types occur with equal 
probability throughout the general population. The actual distribution is: 


A+ 37.7% A— 6.3% 
B+ 8.5% B- 1.5% 
AB+ 3.4% AB-— 0.6% 
O+ 37.4% O- 6.6% 


Using these figures, calculate a blood donor/recipient table for a population 
of 200. 


Rererences/ Dorn and McCracken, Elements of Finite Mathematics with Computing (New 
Information York: John Wiley and Sons, Inc., 1976), pp. 193-198. 


— OTT 
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The growth of a population can be estimated by setting up a simple nonlinear 
model, with any parameter values which would be of interest in a specific 
problem. The following program allows you to study the behavior of such a 
model. 

OBJECTIVE 


Any model we use must make certain basic assumptions about the growth of a 
population. For example, here we will assume that some number (B) of 
individuals are born each breeding season and 


ly [7 B = aP, 
where B = _ the number of births each season, 
THEORY a = a given positive constant, and 
P, = _ the population at the beginning of season r. 


In other words, we assume that the number of births is just proportional to the 
size of the population at the beginning of the breeding season. On the other 
hand, the fraction of the population that dies during each season will not be 
constant, but increases as the population grows (due to scarcity of food, for 
instance). We will assume here that the fraction of the population that dies in 
a season is itself directly proportional to the population, or is equal to bP,, and 
the number of deaths that occur during a season is 


D. =~ bP;(P,) 
where b is a constant factor. 


Thus the total population at the end of the season is expressed as 


Pe; = “Py-raP;—bPi(P,) 
or 
P,.. = (1+a—bP,)P, 


It also may happen that the population remains at a non-zero constant value 
after a number of seasons. That is, the population reaches some equilibrium 
number (P.,) so that 


P..s = (LP; fox l-ea—bP; = 1 


BroLocy 


POPULATION GROWTH 


Under these conditions, P, may be called the equilibrium population P,,, and 


P= 


b 
The population will eventually reach this value independent of the starting 


value of the population in some cases. Note that, if p,=at 1 , P,.1 is negative 


or zero, which must be interpreted to mean that the population is wiped out (it 


: : B cet + 
cannot, obviously, become negative). Therefore, an initial value of Po >atl 


is not a valid starting point for this model. P 


The program included here performs several functions. First, it solves the 
difference equation for the growth of a population and finds the equilibrium 
population, using inputs of a, b, and initial population. Keeping the above 
observations in mind, investigation of this equation for different values of a 
and b helps us to understand and follow the behavior of the model. 


Also, if you know the values of Po, P:, and P., the program will calculate the 
constants a and b: 


P,°> — PoP2 


~ Pedeke. - 


= P,? = PoP2 
PoP, (P; rom P,) 
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Program Keystrokes Purpose/Comments 
OFF/ON Clears calculator and 
enters learn mode. 


000 (2nd) MO (A) 1 Enters a, b, and P, (in that 
[sto] 2 3 order). 


oll (2nd) MH (e) 0 0 Calculates P,,. 
Ret] |] C=) Re 2 (=) 
8 (2nd) 


(2nd) MOH (cj 1 (+) RY] Calculates r and P,.,;. 
(=) Re} 2 GO ke 3 

(=) (2nd) A 3 (nc) BE 20 

[Ret] () (2nd) MW (R75) 

[Ret] 3 (2nd) MM (2nd) 

(R/S) (6To] [Cc] 


bt | Hw [sto Enters P,, P,.,, and P,., 
[sto] 4 5 (in that order). 


064 HO (0) [Nv) (2nc) Calculates a. 
Re] 3 3) Ro 4 x) 1) 
[Rc] 4 (=) Re) 3 FD) (=) St) 6 
CC Re) 4) 3 () Re 3 
(=?) 6 Re) 55 DO) EE) 
kel] 6 (=) 1 ©) So) 1 
(2nd) HT (R/S) 
CC ke) 4 7) ©) 3 Calculates b, then transfers to 
50JI Gras (8) to calculate P.g. 
(Sto) 2 (2nd) MGW [R7s) 


ig 


Exits learn mode. 


Note: Print commands may be omitted if the PC-100A is not used. 


Roo Counter Ros P,-2 
Ro a Ros Used 
Ro» b Roz 

Ros, . Ps Ros 

Ros RB; +1 Ros 
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Procedure Display/Comments 


To calculate P,,, Pi, 
Bet cchbaas 

Enter a. 

Enter b. 

Enter P. 
Calculate P..,. 


UsING THE 
PROGRAM 


Select decimal for 
desired accuracy. P., in set-decimal format. 
Calculate P,. 1.00° season I (r,). 
Bee 
Calculate P.. 2.00° 

P° 


To calculate a, b, 
and P., (if Po, Pi, 
and P, are known): 

Enter Po, P;, and P2. 


Compute a. 
Compute b. 
Calculate P.,. 
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SAMPLE 
PROBLEM 


Calculate equilibrium population and population growth up to equilibrium, 
given the following information: 

a=1.5 P, = 1000 

b=.0001 


Enter program. 


Enter data. 


a=15 15 (4) 
b=.0001 0001 
P, = 1000 


Calculate P,.,. 

Set decimal for desired 
accuracy (we'll use 
2-decimal format). 
Calculate population 
growth. 


Continue to press until population reaches equilibrium. 


19.00 Season 19. 
14999.99 Pio: 


20.00 Season 20. 
15000.00 Page 

21.00 Season 21. 
15000.00 Poi. 
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FURTHER 
EXPLORATIONS 


REFERENCES/ 
INFORMATION 


POPULATION GROWTH 


The information generated will be as follows: 


1.00 8.00 15.00 
2400.00 15017.45 1499.86 
2.00 9.00 16.00 
5424.00 14991.24 15000.07 
3.00 10.00 17.00 
10618.02 15004.37 1499.97 
4.00 11.00 18.00 
15270.82 14997.81 15000.02 
5.00 12.00 19.00 
14857.26 15001.09 14999,99 
6.00 13.00 20,00 
15069.33 14999.45 1500000 
7.00 14.00 21.00 
14964.85 15000.27 15000.00 


Note that in this model the population oscillates about the equilibrium value 


until it stabilizes. 


1, Run the program with the same values for b and Po, but increase a to 1.9. 


What is the effect of increasing a? 


2. A simple model for finding the increase in the number of infected 
individuals in an epidemic is 


kes = (1+CN-C)) 
where C = the constant rate, 
N = the total population, and 
I, = the number of infectives at time kAt. 


By letting a=CN and b=Cand substituting I, for Po, the program in this 
section can be used to model the growth of the epidemic. Use the following 
values to run the program: 


N= 1000 I,=10 
C=,0005 


Dorn and McCracken, Elements of Finite Mathematics with Computing (New 
York: John Wiley and Sons, Inc., 1976), chapters 3 and 5. 
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Facts/ 
THEORY 


A centrifuge is used to separate elements of a solution by spinning a container 
of the solution at a rate on the order of 50,000 rpm at a distance of 5 to 10 cm 
from the axis of rotation. This rotation will subject the particles to a rather 
large centrifugal force and one might expect them to move very quickly. 
However, the solution also is subject to a velocity-dependent frictional force 
with the solvent, which causes the particle velocities to be very slow. The 
objective of the following exercise is to find a simple model of particle 
transport in a centrifuge, and examine the behavior of the sedimentation 
velocity up to equilibrium. 


The velocity of importance here is the sedimentation velocity. This is the rate 
at which the boundary between solute and solvent regions moves. In this 
simple model of particle transport, we will consider the motion of a single 
molecule and use its velocity to represent the sedimentation velocity. The 
forces acting upon a particle in a centrifuge are: 


(1) the centrifugal force, F, = me*r, 


where m =~ mass, 
® = the angular velocity, and 
r= the distance from the center of rotation. 
(2) the frictional force, F, = —fv 
where f = the coefficient of friction, and 
v= velocity. 


So the equation of motion is 


mi = mwow*r—fy, 


or multiplying by Avogadro’s number, No, 

M 

where M = molecular weight. Given the results of diffusion experiments, we 
can calculate the friction coefficient (f) from the measured diffusion 
coefficient as 


r= wr- 


Nf = RT/D 


= the universal gas constant, 
the absolute temperature, and 
the diffusion coefficient. 


where 


R 
3 
D 
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The diffusion coefficient is dependent on the temperature, but here we will 
always use diffusion coefficients given for room temperature, 20°C. So we 
may now write the equations of motion as 


r = oy — ah v 

MD 
Since r is nearly constant, the velocity will increase to some value where 7 =0 
and then remain constant. The constant value will be 


= Mo'*rD 
RT 


Veq 


In the following exercise, examine the behavior up to equilibrium and 
observe that the sedimentation velocity approaches this constant value. The 
program solves the equation of motion numerically, using the trapezoidal 
rule. 


Consider the first order differential equation 


yy = i) 
with the boundary condition y(t.) = yo. 
Given a uniform time mesh, 
t, = ttnh, ya=y(tn), fr =f(yntn), 
then the forward difference approximation to y’, is 
Yn = (Yaes—Yn)/h = fy 
Yar e=" yaokhh, 


This rule may be used to predict a value of y, ... This predictor is used to 
calculate f,., so that the value of y,.; may be corrected using the trapezoidal 
rule, h 

You = YotG(faes +f) 

< é 2 
This corrector may be applied repeatedly until y, ., is constant to within 
some desired accuracy. 


Since the sedimentation equation is second order, we must use this procedure 
on two coordinates, y, and yz, where 


a > 
Vera 
so that 
I = f = yo 
A a P RT 
ta - ae Ys ~ Vp 
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Purpose/Comments 


Clears calculator and 
enters learn mode. 


Stores h, t,, r, and r, ( 
Note: All data must be: pew 
in the order shown here. 


Program Keystrokes 
OFF/ON [RN 


(2nd) MEH (A) (Sto) 4 (S10) 5 
inv} [EE] (R/S) [Sto] 6 
(R/S) [STO] 07 0 [S10] 8 RA) 


(x) 2 Cx) Gnd) Ea =) 60 ©) 
(=?) [sto] 14 [R4) 


Co Rs) =) (4) 0) 15 BS 


Converts w Epa) to rad/sec 
and stores w?, 


Computes MD and stores as 
1/MD. 


8.31 ZO 7 E&) G15 | Calculates RT (R=8.31 X 10’); 
then ake and stores 
RT/MD. 


Calculates equilibrium 
velocity. 


Enters number of integrations 
you want to perform; then 
calculates h/2 and loops to 
CC} to calculate f and g. Then 
calculates f,.,=(h/2)f, and 
Sa+1 = (h/2)g,,. 
Integration Step. Increments t 
by h and calculates predictor 
for (Y:)n+1 and (Y2)n +1. 


Transfers to CC] and returns. 
Multiplies f and g by h/2 to 
find and store corrected 
(Y:)n+1 Value, 


Calculates and stores 
corrected (yz), 41 value. 
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SEDIMENTATION 


Program Keystrokes Purpose/Comments 


Calculates total change in y, 

and y:. If error #0, loops back 
to (2). If error=0, recalls t, r, 
and v and stops. 


Checks memory 0 and repeats | 
integration step, if required. 


Calculates f(y,t) and g(y,t). 
f=r 
g=w*r—(RT/MD)r 


Exits learn mode. 


Roo step counter R,; h R,. Used R,; RT/MD 
Ro Ros tn-1 Ri; Used Rig 
Roz Roz Tne1 R,. Used Ri; 
Ros Ros Tnoa R,; Used Ris 
Roe h/2 Ry, Used Ry, Ris 


= 
\ 


O(a VE Rea ass 
SVAN 


7 
re RE aa fe Yle 
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Enter step size (h). 
Enter t,. 
Enter r,. 


UsING THE 
PROGRAM 


Enter speed of centrifuge 

in rpm. w* in rad/sec 

Enter M. M 

Enter D. 1/MD 

Enter T in °K. Veg" Equilibrium velocity. 


To observe the behavior up to equilibrium, enter the number of iterations you 
want to observe and press to see the velocity at time increments of h. 


- 


5 
Fs) 


i RRRRE 


5) 8 


°This value is printed if the PC-100A is used. 
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I I CTE IE AEST IEA TOIL NPE ALLTEL CEE EEE LID 
SEDIMENTATION 


Given the following information, calculate the sedimentation velocity of 
bovine serum albumin in a centrifuge with a 5.0 cm radius spinning at 
56,000 rpm at room temperature (T = 20°C = 293°K). 


M = 66,500 g/mole 
D = 0.603 x 10-* cm?/sec 
t = 0 
h = 1xX10-™ sec (lupusec) 
N = 30steps 
Enter program. 
Enter step size (h). 1 (EE) 12 [A] 1,-—12 
Enter starting time 
(t). 0 0. 
Enter radius of 
centrifuge (r). 5 0. 
Enter speed of 
centrifuge in 
rpm (@). 56000 34390088.22 w* in rad/sec. | 
Enter M. 66500 66500. | 
Enter D. .603 [EE] 6 
2.4937967 01 1/MD 
Enter T in °K. 293 0002831872  v,, 
Enter number of 
iterations (N). 30 1-12 t 
5. 1 (ys) 
.0001307838 — v, (yz) 


2-12 t 
5. T2 
.0002000978 
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Continue to press and watch the changes as the velocity approaches 
equilibrium. The following information will be generated: 


Notice that the velocity reaches 90% of its equilibrium value in about 4upsec 


1-12 
S 
.0001307838 
2,12 
5. 
0002000978 
3.-12 
5; 
0002392481 
4,—12 
5, 
0002614364 
5.-12 

5 
0002726789 
6.-12 
5 
0002773222 
7.-12 
5 
0002794737 
8.—12 
5. 
.0002810753 
9,-12 

5 
0002818714 
1-11 

5. 
0002824287 


0002831827 


11-11 

5. 
-0002827201 
12-1] 

5. 
-0002829152 
13-11 

5. 
0002830211 


14-11 

5. 
0002830898 
Lo 1h 

5. 
0002831281 
16-11 

5. 
-0002831524 


ag FE 

5. 
.0002831661 
18-11 

5. 
-0002831747 
19-11 

5. 
.0002831797 
2.—11 

5 


0002831845 


0002831856 


-000283 1862 


-0002831869 


.000283 1871 


0002831871 


-000283 1872 


2.1-11 
5 


2.2-11 
5 


2.3-11 
5 


2.4-11 
5 


-000283 1866 


2.5-11 
5 


2.6-11 
5. 
000283187 


2.7—-11 
5 


2.8—-11 
5 


2.9-11 
5 


-0002831871 


33:— 11 
5 


and 99% of its equilibrium value in about 7.5yusec. After that it increases very 


slowly to its constant value. 
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1. Find the sedimentation velocity for serum albumin if r, =7 cm and the 
centrifuge is set for 40,000 rpm. 

2. For sucrose (M = 342, D= 4.586 X 10-° cm*/sec) at 20°C, find the value of w 
in rpm that would give a sedimentation velocity of 1 cm/hr in a 7 cm 


FURTHER : 7Ny 4 ¥ 5 3 
ay Gs as us re will give w adians/sec. 
ss OnATIOND centrifuge. (Note that the formulas used here will give w in radians/sec 


Watch your units.) 


REFERENCES/ XK. Van Holde, Physical Biochemistry (Englewood Cliffs, N.J.: Prentice-Hall, 
InForMATION 1971), pp. 79-97. 
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Introduction 


Along with showing you several applications for your programmable 
calculator in biomedical engineering, this chapter also has another special 
purpose. It demonstrates the way these applications fit together into a 
complete project. Although each of the programs is useful in and by itself — 
and by no means limited to the specific usage shown here — their power is 
fully utilized when they operate in combination. 


The ultimate objective in this chapter is to determine cardiac output by 
analyzing samples of arterial and venous blood and measuring body oxygen 
consumption. First, we need to design and optimize a means of collecting the 
necessary data. Next, the actual calculations for cardiac output must be 
made. Then the results need to be verified, and the system design evaluated. 
The elements of the system we use here are shown below. 


PATIENT SCALING 


AND FILTERS AND 
TRANSDUCERS INTERACTION 
SAMPLER CORRECTION 


CARDIAC 
REFERENCE OUTPUT 
METHOD COMPUTATION 


Paired t-test 
Regression 
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INTRODUCTION 


The patient and the transducers are one block of the system, from which 
electrical signals are obtained. The signals are filtered to improve the signal- 
to-noise ratio, and the calculator itself helps in the filter design. Next, the 
possibility of automated multiple measurements (to reduce variability by 
averaging) is considered. The calculator is used to relate accuracy after 
averaging to the number of samples averaged. Also, as part of the design 
consideration, we examine the possibility of using one transducer for all 
required measurements of oxygen gas tension. (Readings are taken 
sequentially.) In doing so, certain procedures are used to offset undesired 
interactions among sequential measurements caused by transient response 
characteristics of the measuring electrode. After measurements are taken, the 
cardiac output is calculated by the Fick equation. As part of the calculation, 
the oxygen content in the blood samples is determined. 


Finally, we analyze the performance of the overall system. The approach 
used here is to compare the performance of the designed system with that of 
an alternate or reference system. One program looks at paired data obtained 
by the two systems in order to test the hypothesis that there is no significant 
difference between the results of the two systems. Another program uses 
regression analysis to fit a line to the points found when data from one system 
is plotted against that from the other. 


Beyond the applications shown in this chapter, the filter design program and 
the scaling interaction analysis are useful in other signal processing problems. 
Also, the Fick equation program can be used to provide oxygen content data 
from blood gas tensions, pH, hemoglobin, and temperature. The statistical 


analysis programs are, of course, applicable to a wide range of problems and 
fields. 


BIOMEDICAL ENGINEERIN 


iActive Filter to Improve 
Signal-to-Noise Ratio 


OBJECTIVE 


Facts/ 
THEORY 


Transducer outputs are often observed to be noisy, which can make it 
difficult to accurately measure the signal output of a transducer. An effective 
means for improving signal-to-noise ratio is the use of a filter. The following 
program allows you to calculate the parameters of a simple operational 
amplifier active filter given initial design specifications. 


A circuit diagram for a simple band-pass filter using one operational 
amplifier is shown in Figure 1, and a representative frequency diagram for 
such a filter is shown in Figure 2. 


Figure 1. Band-pass Filter. 


Magnitude (dB) 


Figure 2. Frequency Response of Band-pass Filter. 
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THE 
PROGRAM 


eS IE II I ae Oe ET a REE, 
ACTIVE FILTER TO IMPROVE 
SIGNAL-TO-NOISE RATIO 


The filter attenuates signal frequencies outside the passband. In Figure 2, the 
range of frequencies from f, to f, is the filter passband. The 3dB low- 
frequency cutoff is labeled f, and the 3dB high-frequency cutoff is labeled f,. 
The phase shift in the passband is close to zero but approaches + 45° at the 
cutoff frequencies. 


Inputs to the calculator are the gain (G) of the filter in the passband, the 
feedback resistance (R,), and the 3dB cutoff frequencies (f, and f.). The 
remaining parameter values are calculated as follows: 

R, G 1 


m= GaP oee "ge 


Modification of the above for the low-pass and high-pass filter is very easy. 
The low-pass filter passes all frequencies from direct current to the high- 
frequency cutoff f,. This is accomplished by removing capacitor C, in Figure 
1. The high-pass filter passes all frequencies from the low-frequency cutoff 
f, to an upper limit imposed by the non-ideal behavior of the operational 
amplifier used. The high-pass filter is obtained by leaving C, in the circuit 
and removing C,. (See Figure 1.) In any of these cases, the calculations 
remain the same, except to ignore the values for unused capacitors. 


Program Keystrokes 


Soe OFF/ON 


(2nd) MO (A) (Sto) | Gnd] MA Rs) 


(2nd) MON (2nd) MEM (S10) 2 (2nd) 


foi | Gd) 2) SO) 3 Gs I 
[01s | Ge) MM Ce) SO 4 ed) 


Purpose/Comments 


Clears calculator and enter: 
learn mode. 


Store f,in memory 01. 


Store f, in memory 02. 


Store G in memory 03. 


Store R, in memory 04. 


[2nd] MON (nc) MGM [Rel] 4 (=) Re3 


Calculate and display R;. 
(=) 
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Program Keystrokes Purpose/Comments 


034 


REGISTER Roo 
CoNTENTS Re ht 


Ror fy 
Ros G 
Ror Re 


Enter f,. 
Enter f,. 
Enter G. 
Enter R:. 
Clear display. 


Usinc THE 
PRocRAM 


BEAE Be 


0 
0. 00 


a 


Place calculator in 
engineering mode. 


Ey 


In most situations, n= 2 is 
desired accuracy. 

R,° 

C,° in farads. 

C,° in farads. 


Fix decimal to desired 
accuracy. 

Calculate the value of R,. 
Calculate the value of C,. 


a oe 
EG G 


Calculate the value of C). 


°These values are printed if the PC-100A is used. 
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9 ACTIVE FILTER TO IMPROVE 
SIGNAL-TO-NOISE RATIO 


Given the parameters R; = 10,000 ohms, G = 1, f, = 0.002 Hz and f, =0.5 Hz, 
find the values of R, (ohms), C, (farads), and C, (farads) for the band-pass filter 
in Figure 1. 


SAMPLE 
PROBLEM 


Enter program carefully. 0 


Enter f,. 003 0.002 


Enter f,. 0.5 

Enter G. 1. 

Enter R.. l. 04 

Clear display. 0 

Place calculator in 0. 00 

engineering mode. 

Fix the decimal point for g 0.00 00 

desired accuracy. 

Press i for value 10.00 03. This is R,. 
of R,. 

Press (2) for value of 7.96-03 This is C,. 
G:. 


Press H® for value 31.83-06 This is Cp. 
of C,. 


1, Design a high-pass filter for which G = 1, and f, = 0.002 Hz. Repeat for a 
low-pass filter with G = 1, f, =0.5 Hz. 


2. Determine appropriate component values for the filters in Figures 3 and 


Forni 4 given in each case a passband gain G, a cutoff frequency f, damping ratio $ 
IEXPLORATION and capacitance C. 


Figure 3, High-Pass Filter Figure 4, Low-Pass Filter 


Rererences/ J. G. Graeme and G. E. Tobey, Operational Amplifiers: Design and Application 
InrorMaTION (New York: McGraw-Hill, Inc., 1971). 
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Estimating Number of Samples 
for Specified Standard Error 


Facts/ 
THEORY 


Due to noise in the passband, sampled values of transducer output can show 
variation even after filtering, but averaging of multiple measurements can 
reduce error. This program allows you to specify the standard error (e) and 
the percent confidence desired. The program then computes the number of 
samples necessary for the measurement average to estimate the population 
mean. Traditionally calculations of this kind have required referencing of 
statistical tables. However, the problem can be solved on the calculator, 
without tables, using two Master Library programs. 


Additive Gaussian white noise is assumed so that the noise associated with 
each measurement is an independent variable. As the number of 
measurements (N) increases, the mean of the measurements (X) approaches 
the true mean (1), which would be obtained if there was no noise. The value 
of N must be determined such that 

Probability \\z-n\<ef =a [1] 
The magnitude of the difference x —p is called the error of estimate. In the 
above relationship 100a is described as the percent confidence that the error 
of estimate is less than e. Even though p is unknown, one can still speak of 
how close x is to #, and therefore can find the number of samples necessary 
to obtain the desired accuracy of the estimate of p. 


The equation to find N is given by 


where a is the standard deviation of the samples, ° e is the allowable error of 
estimate, a is the probability found in equation [1], and xa/z is the number of 
standard deviations of a Gaussian variable x such that the 

Probability | x<Xxq/2 | =a/2. 


To find x,4,2 for a given a, one needs to solve the following equation for xa,2. 


SO eps 3 
see ba f(Xa/2) [ ] 


We can use the calculator to solve for Xa/. by rewriting equation [3] as 


g(x) a f(a») 5" =(@Q [4] 


*If the standard deviation is unknown, it can be estimated by calculating o 
for a preliminary sample using the statistics functions described on page V-32 
of Personal Programming. 
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ESTIMATING NUMBER OF SAMPLES 
FOR SPECIFIED STANDARD ERROR 


The function f that we are using is the area function Q(x) determined by 
Master Library Program ML-14. This particular function was chosen since a 
Gaussian or normal distribution of the means was assumed. Once equation [4] 
is generated, we will use Master Library program ML-S to find the xXe,2 value 
that makes g(x) equal 0. Then we can evaluate equation [2] for the number 
of samples we must use. 


| Step # | Program Keystrokes 


Fake OFF/ON [ia] 


Purpose/Comments 


Clears calculator and enters 
learn mode. 


Enter percent confidence 
(a). 
Calculate and store 
1—(a/100). 

9 


Enter and store o. 
Enter and store error e. 


Calculate and display 
sample size N. 


Xa/20 D 
e 


Generate function to be 
zeroed. 


ok 
N= | 


Initialize program ML-08 to 
find the root of the function 
generated in . 

Note that — 15.11 and 15.11] 
are the maximum limits for 
ML.-08. 


Exits learn mode. 


Note: Print commands may be omitted if the PC-100A is not used. 
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.ESTIMATING NUMBER OF SAMPLES 
IFOR SPECIFIED STANDARD ERROR 


REGISTER Ro: — Roo ML-08 Rai 0 
ConTENTS Ro. —Ros ML-14 Ris e 
Rio [1 —(a/100)]/2 


Enter percent confidence. 1 —(a/100) 
2 


Enter o. 


UsING THE 
PROGRAM 


Enter allowable error 
estimate. 


Calculate sample size. 


°This value is printed if the PC-100A is used. 


A preliminary sample of cardiac output yielded a standard deviation (0) of 
0.3. How large a sample is required if we want to be 95% confident that our 
estimate of the true mean p is off by less than 0.05? 


Enter program carefully. 

Return calculator to [INV] [is | 
standard display. 

Enter percent 95 (AJ 
confidence. 


SAMPLE 
PROBLEM 


Enter standard deviation 3 (8) 
(0). 
Enter error e. 05 CE) 


Press CC] for the sample Cc) 
size (N). 


1. Write a program that will compute the percent confidence for a given 
sample size, standard deviation, and error. 


2. When using Master Library Program ML-08, the value for the maximum 
error E is automatically set to 0.01. Investigate the effects of changing E 


FuRTHER ae 
XPLORATIONS on sample size determination. 


REFERENCES/ RE. Walpole and R. H. Meyers, Probability and Statistics for Engineers and 
WFORMATION — Scientists (New York: Macmillan Publishing Co., Inc., 1978). 
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Transducer Scaling and Interactions 


The outputs of transducers are typically voltage levels which actuate meters 
or other readout devices. Additional methods can be employed to linearize 
the transducer output, make zero or baseline adjustment, and perform 
scaling of measurements. When sample values are read sequentially, a 
residue of earlier samples may remain in the transducer and affect readings. 
Recognition of this last problem and correction or compensation for it may 
be necessary. The program below solves the linear segment of this problem 
by finding the interaction matrix needed to correct readings and provide 
scaling. 


The matrix equation relating corrected readings to sampled values of 
transducer output voltages is: 


P, = B.+K(P,—B,) 0) 
where p, = an Nx! column matrix representing true (corrected) gas 

tensions for N sequential samples. 

P, = an Nx] column matrix of transducer output voltages to be 
corrected. 

B, = an Nx! column matrix of true gas tensions for a set 
of N sequential samples. 

B,) = an Nxl column matrix of transducer output voltages from 
the set of N sequential samples. 

K = an NxN matrix representing a correction constant. 


Note: Matrix elements are identified by italicized symbols. 


To find B,, N sequential samples of calibrated gases having true gas tensions, 
B,,..., By, are passed through the transducer. The transducer outputs, 
B,,..., By, from the N sequential samples give the values for the column matr 
B,. The two column matrices B, and B, are called baselines. 


To determine K for a particular system, calibrated gases with known gas 
tensions are used in the system. In addition to finding baseline values, N more 
trials with N sequential samples of the calibrated gases are used. The N 
additional trials have known gas tensions P,,..., Py and corresponding 
transducer voltage readings P,,..., Py. When K has been determined, it can 


then be applied to the transducer outputs for other gases to find their true gas 
tensions. 


————— ee 
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TRANSDUCER SCALING 
AND INTERACTIONS 


Consider for example N =3. Then we have 


me P,, Py; “ B, B, 
P,= Fa P,= Ps B, = B, B, = B, 
Pes P,; B, B; 


Once the calibration data is collected, it is used in the following matrix 


equation. 
P=B+K(P-B) 


where P=[P, P, P,] B=([B, B, B,] 
P=([P, FP: P3] B=[B, B, B,J] 
We can rewrite equation [2] as: 
P-—B=K(P—B) 


Now if we define 
=P——B and P’=P-B 
then equation [3] becomes: 
P’=KP’ 
Solving equation[4] for K yields: 
K= Pp" 


[2] 


[3] 


[4] 


[5] 


In solving for K, two Master Library programs will be used. To find P”' 
(inverse matrix of P’), we simply use program ML-02. Matrix multiplication 


can be done quickly using program ML-03. Remember that matrix 


multiplication is not commutative (ABBA), so be sure you perform the 


multiplication in the order shown. Also, note that P’ and P’"' must 


both be 


nonzero matrices to insure that K is nonzero. This can be assured by the 
choice of calibration gases used. In addition, P’ must have a nonzero 


determinant in order to compute P”” a 


Note that you can choose the calibration gas sequences so that P’isa 


diagonal matrix with diagonal elements a (#40). This insures that 


P’ is 


nonzero and also simplifies equation [5]. Thus we have the following equation: 


K=aPp’" 


The following program is designed to help you compute the matrices P’ and 
P’ by performing the matrix subtractions for you. Also, the program will help 
you perform the matrix inversion and calculate K=aP’'. Note that the 
matrix inversion part of the program is set up for a 3 x 3 matrix. This is 


normally a sufficient test. However, if you wish to use a larger mat 


rix, you 


must make the appropriate program changes and may have to repartition the 


calculator. 
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REGISTER 
ConTENTS 


TRANSDUCER SCALING 
AND INTERACTIONS 


Program Keystrokes 


OFF/ON 


Purpose/Comments 


Clears calculator and enters 
learn mode. 


Initializes memory 0. This 
register is used for indirect 
accessing of data. 


Subroutine to load the first 
matrix (P) into memory. 


Subroutine to subtract the second 
matrix (B) from the first matrix 
(P) giving matrix P’. 


Bee) we 


Calls Master Library Program 02 
to calculate P’ *. 


SEE 


If P’ is a constant diagonal 
matrix, this subroutine may be 
used to compute aP’ "a must be 
stored in memory 1 before 
running this subroutine. 


Exits learn mode. 


Roo Used Roz — Ro; Used by ML-02 
Ro, @ Ros—Ry. P,P’, P’™' 


~~. 
~~, 
~~, 
—— 
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TRANSDUCER SCALING 
AND INTERACTIONS 


Clear memories. 


Usinc THE Initialize program. 
ProcRAM ; 
Enter P matrix by 


columns. 
Pi 
P2, 


P33 
Reset program. 
Enter B matrix by columns. 


Note that the columns are 
identical. 


P's3 
Calculate the P’””' determinant’ This is the 


matrix. determinant of 
the P’ matrix. 


Fix decimal point to 
desired accuracy (n 
places). 

Calculate K (Method 1). 
(Use only if P’ is a 
constant diagonal matrix.) 
Initialize memory 0. 


Store « in memory 1. 


°This value is printed if the PC-100A is used. 
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e) TRANSDUCER SCALING 
AND INTERACTIONS 


Display /Comments 


Calculate 
Ki, K i 
K2, K,, 


K3; Ka, 
OR 
Calculate K (Method 2) . 


(Use if P’ is not a constant 
diagonal matrix.) 


To use program ML-03 
you must move the P’ 
matrix already calculated P’y° 
to memories 30-38. P’;!° 


38 | Pil? 


Exit Program ML-02. 


See Master Library, 
pp. 14-15 for directions 
on matrix multiplication. 


°This value is printed if the PC-100A is used. 
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TRANSDUCER SCALING 
AND INTERACTIONS 


Consider the use of two calibration gases; one contains oxygen at a partial 
pressure of 50 mm Hg and the other contains oxygen at a partial pressure of 
147 mm Hg. The lower pressure gas is used to obtain the baseline values and 
three sequential samples of this gas produce transducer outputs of 75.6 mV, 
SAMPLE 100 mV, and 109 mV. This gives us the following baseline matrices: 


PROBLEM 
- 50 75.6 
B, = 50 B, = 100 
50 109 


For the rest of the test, the gas samples used and transducer outputs are 


shown in the tables below. 
Sequential Calibration Gas Transducer Output 


Sample Number (mm Hg) (mV) 


222 75.6 75.6 


144 246 100 
128 153 255 


Enter program. 


wwe 


Clear data registers. 
Initialize program. 


Enter P matrix. 
Py 


iS 
Te) 


P33 


Reset program. 


[A] 
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ST SR TE a 
TRANSDUCER SCALING 
AND INTERACTIONS 


Enter B matrix. 


146.4 
B, 


146. 
Calculate the P’ ' 
matrix. [oD] 
Fix decimal point. 
(We'll use 3 for this 
example.) 


3120662.4 Wait for 
display value 
before continuing, 


(ckR) [2nd] A 3 0.000 


To calculate the P’ matrix we must subtract B from P. This is easily done in 
our example since B is the matrix consisting of three columns of the B, 
matrix. Thus B is a matrix with the value 50 in every position. Thus our P’ 
matrix can be computed easily as follows. 


sgt Ter, © 
P=P-B=| 0 97 0 
0 0 97 


Since this is a constant diagonal matrix we will use method 1 to calculate K. 


Initialize memory 0. 


Display/Comments 


97 [sto] 01 


Store a in memory 1. 


Calculate K. 
Kas (Ee) 
Ke Ce] 
Ks, CE} 
Ki a) | 
Ky. CE] 
Ky. CE) 
Ks CE} 
Kiss CE] 
Ksy CE] | 
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TT I I I EO 
TRANSDUCER SCALING 


AND INTERACTIONS 


Thus our K matrix is: 
0.663 0.000 0.000 
K= — 0.200 0.664 0.000 
—0.026 —0.200 0.664 


This matrix can now be used in equation | to convert the transducer outputs 
of unknown gases into their true gas tensions. 


REFERENCES/ Bernard Kolman, Introductory Linear Algebra with Applications (New York: 


‘INFORMATION Macmillan Publishing Co., Inc., 1976). 


—— 


y Q ~ - 
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Cardiac Output Using 
the Fick Equation 


Cardiac output is calculated by entering the appropriate data into the Fick 
equation: 

Oxygen Consumption 
Arterial Blood O, Content — Venous Blood O, Content 


Oxygen contents of blood may in turn be calculated from oxygen and carbon 
dioxide gas tensions, hemoglobin level, temperature, and pH. 


Cardiac Output = 


The Fick method for measuring cardiac output is based on simple mass 
balance. The rate of blood flow through the heart and lungs can be 
determined by measuring the uptake of oxygen and the change in 
concentration of oxygen as blood passes through. The oxygen uptake (or 
oxygen consumption) can be determined from respiratory gas measurements. 
Oxygen content of blood can be calculated from a combination of data 
acquired during analysis of blood samples. The relationship of content to 
measured variables is as follows. 


Facts/ 
THEORY 


1.39 (Hb) (% Sat) 
100 + .003 (Po,) 
Ax + Bx? + Cx? + x‘ | 

D + Ex + Fx? +Gx' + x‘ 
x=Virtual Po, (mm Hg)= Po, 107 


Blood O, Content (vol %) = 


% Sat = 100| 


z = .024 (37 — temp) + .40 (pH — 7.4) + .06 (log 40 — log Peo,) 


where Hb = hemoglobin (g/100 ml), 
% Sat = % saturation, 
Po, = oxygen gas tension (mm Hg), 
Poo, = carbon dioxide gas tension (mm Hg), 
pH = blood pH, 
temp = _ blood temperature (°C), 
A = —8532.2289, 
B = 2121.4010, 
C = —67.073989, 
D =  935960.87, 
E = —31346.258, 
F = 2396.1674, and 
G = 67.104406 


The program which follows is written so that values of temperature, pH, 
hemoglobin, oxygen and carbon dioxide gas tensions, and oxygen 
consumption are entered under separate user labels. Any entry can be 
changed without affecting other previously stored values. 
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(CARDIAC Output Usinc 
“THE Fick EQUATION 


|| THe 
|| Procram 


Stores calculated result for 
venous blood O, content. 


Evaluates the Fick equation 
for cardiac output. 


Calculates z. 


Calculates Virtual Po, (x). 


= fj 
MW) Wl 


5 
= fal 
Bs 
= bx 
wa 
Sl os 
8 

a 


Stores x’, x3, and x’. 


Calculates % saturation. 
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REGISTER 
ConTENTS 


Carpiac Output Usinc 
THE Fick EQUATION 


sae Program Keystrokes 


1.39 GO Ra) 4 Cd) Rk) 9 ©) 
&) CO 100 ©) .003 KX) Re 1 
(=) ONv) 2nd) GE 1 (EE) (Sto) 10 


Purpose/Comments 


Calculates blood O, | 
content. If venous blood O, | 
content has been calculated 
(flag 1 not set), transfers to 

subroutine [EE] and stores | 
Cvo, in memory 11. If 
arterial blood O, content | 
has been calculated (flag 1 

set), stores Cao, in memory 
10. 


(2nd) MOE (2nd) ME (2nd) BO | 
(2nd) 


(2nd) MOE [2nc] BEG (Nv) (2nc] BE 1 


Starts calculation of Cao, 
(arterial blood O, content). 


Starts calculation of Cvo, 
(venous blood O, content). 


Roo Rog Virtual Po, R,, D 
Ro Po, Ros % Sat Ry; E 
Roz Peo, Rio Cao, Ry F 
Ros pH Ri, Cvo, Ry G 
Ros Hb R,. Ray x" 
R,; temp R,, A Ra x° 
Ros O, consumption Ry, B Re. x* 
Ro; Z Ri, C Ras 


Note: Intermediate results are stored during calculation and can be recalled 
from memories if needed. 
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(Carpiac Output UsiInG 
‘THE FICK EQUATION 


UsING THE 
ProcRaM 


(Optional) 


ey 
| 


Set decimal for desired 
accuracy. 


Enter constants. 


13 
14 
15 
16 
17 
18 
19 


Jsassas 
Om OOw> 


Enter arterial blood data. 


Po, [A] 
Poo. 
pH 
Hb Co 
temperature CE] 
oxygen consumption 
Calculate arterial oxygen [2nd] 


content. 


Enter venous blood data. 
Po, 
Pco, 
pH 
Calculate venous blood 
oxygen content. 


Bl GEE 


Ey 


Calculate cardiac output 
using the Fick equation. 


°This value is printed if the PC-1O0A is used. 
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SAMPLE 
PROBLEM 


rere er cre seen s scree ec a TE 
Carpi1ac Output Usinc 
THE Fick EQUATION 


Find the cardiac output given the following information. 


Arterial Blood Data Venous Blood Data 
Pao, = 123 mm Hg Pv, = 40.3 mm Hg 
Paco, =31.8 mm Hg Pvco, = 38.1 mm Hg 
pH, =7.47 pH, =7.45 


Hb= 16 g/100 ml 
temp =37.1°C 
O, consumption = 317 ml/min 


Enter program. Set (We'll use a 2-place 
decimal for desired decimal setting for 
accuracy. convenience. ) 
Enter constants. 
8532.2289 13 — 8532.23 
2121.401 14 2121.40 
67.073989 15 — 67.07 
935960.87 16 935960.87 
31346.258 17 | —31346.26 
2396. 1674 18 2396.17 
67.104406 19 — 67.10 


Enter arterial blood 


data. 
Pao, 123 [4] 123.00 
Paco, 318 (8) 31.80 
pH, 7.47 TAT 


Enter hemoglobin (Hb) | 16 [2] 16.00 
in g/100 ml. 


Enter temperature in | 37.1 CEJ 37.10 
°C. 

Enter oxygen 317 Le 317.00 
consumption in 

ml/min. 


Calculate arterial (2nd) 21.85 


oxygen content. 
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Carpiac Output UsiInG 
THE Fick EQUATION 


Enter venous blood 

data. 
Pvo, 40.30 
Pv co, 38.10 


pH, 7.45 
Calculate venous 17.09 
oxygen content. 


Calculate cardiac 6.67 litres/min 
output. 


For a Py, less than 10 mm Hg, the equation for % saturation should be 
changed to 
%Sat = 100 (.003683x + .000584x’). 


Revise the program to allow for this situation. 


RererENcES/ J. B. West and P. D. Wagner, “Pulmonary Gas Exchange” in Bioengineering 
INFoRMATION Aspects of the Lung, ed. by J. B. West (New York: Marcel Dekker, 1977). 
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Student’s t-Test 


Once the design and implementation of a new measurement system are 
complete, the system must be evaluated. One approach to the evaluation is 
to match the results from the new system with data from a reference 
measurement system. When true cardiac output becomes constant, data can 

be collected in pairs that contain one cardiac output determination from 
each method. For example, blood gas samples for the Fick method might be 
collected from a patient at the same time that a dye dilution test is 
performed. Both the Fick method and the dye system should give you 
essentially the same results but with some measurement errors in each. The 
calculator is employed to perform the student’s t-test on the data. From the 
results of the test you can determine the likelihood that any differences in 
results from the two methods are due to measurement errors and that the 
average difference of repeated cardiac measurements from the two methods 
would approach zero. 


The student’s t-distribution is used here under the assumption that the data is 
drawn from a Gaussian distribution and that the variance of the data must be 
estimated, The calculator is used to compute the probability that an 
observed average difference (or any lesser difference) in paired data could 
have occurred by chance, assuming that the true mean difference is zero. 


Facts/ 
THEORY 


To find the desired probability, the following integral must be evaluated. 


ae 


hit»)={ r( 2 
-t 


dy 
Vv 
var T (3) 
where: » = _ degrees of freedom, usually n—1 
t = xvVn 
a= s 
Ax = average difference between paired cardiac output values 
obtained by the two measurement methods 
n =~ number of paired samples 
s = standard deviation estimate of differences 
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SITUDENT’S t-TEST 


The desired probability is then given by 
P=1-hit,v) 


If P is greater than 0.5, then the average difference between the two methods 
is insignificant. However, if P < 0.5, then there is a significant difference 
between the two methods, and you should not assume that the differences are 
due to measurement error. 


The integral given above may be easily evaluated using series 
approximations. There are three difference approximations, depending on 
the value of v. 


v even = 
nh of 1°3°5...4v—-3 =i 
h(t,v)=sin 6(1 + scos'8 +) cos'8 + eb Spa eS cos” 2) 7) 


v=] 
v= z 
h(t,v) = 2 
v odd, v AL 
we 29 2 ne Bin OL > cost 2'4..(¥—3) | (y—3) 
h(t,v) = += cos sin 8 (1+ 3 cos O+..4+ 35.(p 3) cos 6) 


where 8 = arctan (t/\/) with @ expressed in radians. 


The following program evaluates these series and finds the value P. The 
program will also calculate t, the mean difference Ax, and the standard 


deviation of the differences. 
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STUDENT’s t-TEST 


9 


PROGRAM 


| Step # | Program Keystrokes 
peta OFF/ON [kil 
tied nd) A) =|) 


005 HO (2n¢) EB (=) Linv) [2na) 


[2nd] 


5 


me Ce) Ra) 3 (=) (X) [nd] 


BAB) 


0 
(a) 
078 [2nd] 
[a 
[zal 
Ga 13 
13 
(a) 
111 [2nd] 
[a 
9-26 


Purpose/Comments 


Clears calculator and enters 
learn mode. 


Assimilates the difference of 
each sample. 


Deletes faulty sample (if 
necessary). 


Computes t. 
t=Ax\/n 


Ss 


Calculates 6 = arctan (t/\/r) 
and stores it in memory 10. 
Note this automatically 
computes ¥=n— 1. 


Initializes registers for 
calculation of P. 


Determines status of v. If 
v=], transfers to subroutine 
WB | If v is even, transfers to 
subroutine CE). 


For v odd, » # 1, computes 
h(t,v). This sum is stored in 
memory 11. When the 
summation reaches the 

(v —3) term, transfers to 
subroutine CC]. 


Multiplies the sum 
computed in 
subroutine Hd by 
2 sinOcosO 

Ce 
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STUDENT'S t-TEST 


Purpose/Comments 


(2nd) MON (2nd) BG fre) 10 1X) 2 Evaluates 22 and adds it to 
a (=) SoM 11 Re) 11 =| whatisin memory 11. 
1e (Note this is a zero if y=1, 

and is the value computed 
by MGM and [C) ify is odd 
and v # 1.) Then computes 


P=1—h(t,v). 


For v even, computes 
h(t,v). This sum is stored in 
memory 11. When the 
summation reaches the 
(v—2) term, transfers to 
subroutine MG . 


[2nd] 


o 


= 


JAH 
KB 


Hae 
Spe i 


Multiplies the sum 
computed in subroutine 
CE] by sin #. Then 
computes P = 1 —h (t,»). 


REGISTER  Ry,—Rog Statistics Ri h(t”) 

CONTENTS Ro: Counter R,. Used 
Ros Used R,, Used 
Ros R,, cos’6 
Rio Used R,; cos*6 
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STUDENT’S t-TEST 


Display/Comments 


Clear the memories. 0. 


“ Fix the decimal point 
to desired accuracy (n 
PROGRAM places). 
Enter data pairs. 
First value First value 
Second value Pair number 
Repeat for each data 
pair. 
Remove faulty data 
pair. 
First value (as First value 
input). 
Second value (as Previous pair number 
input). 


Calculate P. P 


Optional: 
Calculate t. -_ 
Calculate mean x Ax 
difference. 
Calculate standard 
deviation of 
differences. 


nv 


Note: If the information stored in data registers 01-06 by pressing [4] is 
already known, it can be entered directly into those registers as shown 
in Personal Programming, p. V-33. 


Suppose the following data were collected from two different systems. Use 
the program to calculate Ax, s, and P. Is there a significant difference 
between the two systems? 


5 = System 1 System 2 
oars 
6.67 6.85 
5.42 5.50 
7.96 7.43 
9.66 8.49 
4.42 5.12 


Q_9R Rrasweenicar ENCINEERIN 


STUDENT’s t-TEST 


Enter program. 
Clear data registers. 


Select 3-decimal place 
display. 


Enter data pairs. 


Calculate mean 
difference. 

Calculate standard 
deviation of difference. 


Calculate P. 


The average difference between the two methods is insignificant. 


RerereNces/ U.S. Department of Commerce, National Bureau of Standards, Handbook of 
INFORMATION Mathematical Functions, M. Abramowitz and Irene Stegun, eds. 
(Washington, D.C.: U.S. Government Printing Office, 1968). 
R. E. Walpole and R. H. Myers, Probability and Statistics for Engineers (New 
York: Macmillan Publishing Co., Inc., 1978). 


Personal Programming, pp. V-32ff. 


ese ane eg ae ee 
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UsING THE 
PROGRAM 


SAMPLE 
PROBLEM 


STUDENT’S t-TEST 


| Procedure | Press |_Display/Comments 


Clear the memories. 


Fix the decimal point 
to desired accuracy (n 
places). 


Enter data pairs. 
First value 
Second value 

Repeat for each data 

pair. 


First value 
Pair number 


Remove faulty data 
pair. 
First value (as 
input). 
Second value (as 
input). 


First value 


Previous pair number 


Calculate P. P 
Optional: 
Calculate t. i 
Calculate mean Ax 


difference. 
Calculate standard 
deviation of 

differences. 


Note: If the information stored in data registers 01-06 by pressing [4] is 
already known, it can be entered directly into those registers as shown 
in Personal Programming, p. V-33. 


Suppose the following data were collected from two different systems. Use 
the program to calculate Ax, s, and P. Is there a significant difference 
between the two systems? 


System 1 System 2 
6.33 6.14 
6.67 6.85 
5.42 5.50 
7.96 7.43 
9.66 8.49 
4.42 5.12 
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SsTUDENT’s t-TEST 


TREFERENCES / 
INFORMATION 


Enter program. 


Clear data registers. 


Select 3-decimal place 
display. 


Enter data pairs. 


Calculate mean 
difference. 


Calculate standard 
deviation of difference. 


Calculate P. 


The average difference between the two methods is insignificant. 


U.S. Department of Commerce, National Bureau of Standards, Handbook of 
Mathematical Functions, M. Abramowitz and Irene Stegun, eds. 
(Washington, D.C.: U.S. Government Printing Office, 1968). 

R. E. Walpole and R. H. Myers, Probability and Statistics for Engineers (New 
York: Macmillan Publishing Co., Inc., 1978). 


Personal Programming, pp. V-32ff. 
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THEORY 


THE 
PROGRAM 


Regression Analysis 


A second approach for comparing two systems of cardiac output 
determination is to plot the results as data pairs on a graph. Each cardiac 
output value from the reference system can be the x-variable of the point 
and the value from the new system can be the y-variable. A regression line 
fitted to the data by the calculator will then show a minimum squared-error 
fit to the values and can be represented by y= mx +b where b is the y- 
intercept and m is the slope of the line. Additionally, since both systems are 
expected to yield progressively smaller values as cardiac output approaches 
zero, a line which is constrained to go through the origin can also be fitted to 
the data. 


The theory applicable to the regression line is described in Personal 
Programming, pp. V-32-39. 


One expects that a small value of cardiac output by one method would show 
a comparably small value by the other. Consequently, a second line is fitted 
to the data — a line passing through the origin. The equation for this line is 

y=m,x, where m, is defined as: 


oo, ae 


This is an easy application of the calculator’s = + function because statistical 
analysis places 2xy in data register 06 and 2x’ in data register 05. The 
program in this case simply divides the contents of register 06 by those in 


Purpose/Comments 


Clears calculator and enters | 
learn mode. 


| 


register 05. 
We CE) 6 C=) Ra) 5 (=) | Calculates my. 


Step # | Program Keystrokes 
en (ww) 


OFF/ON 
fe en ee liecerigarnmods | 
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IEGRESSION ANALYSIS 


01 Prepare for statistical 
storage. 


Procedure 


Clear data registers 01- 
06. 

Select 3-decimal 
display 


Usinc THE 
'PRocRAM 


i 3 


Enter measurement for 
method #1], trial 1. 


Previous value displayed. 


Pair number displayed. 


Enter measurement for 
method + 2, trial 1. 


Repeat this entry 
sequence for each 
trial. 


Calculate y mean. 


Calculate x mean. 


Calculate standard 
deviation of y. 


Calculate standard 
deviation of x. 


Calculate y-intercept. 


Calculate slope. 


BAA 8 Bae@ 


Calculate correlation 
coefficient. 


Fl 


Calculate slope m, for 
the equation y =m,x. 


°This value is printed if the PC-100A is used. 
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REGRESSION ANALYSIS 


Apply the regression analysis to the data in the previous section, listed again 
below. 


Trial System #1 System #2 
1 6.33 6.14 
2 6.67 6.85 
3 5.42 5.50 
4 7.96 7.43 
5 9.66 8.49 
6 4.42 5.12 


Clear data memories 
01-06. 


Select 3-decimal 
display. 


Enter data points. 


Calculate statistics. 


FEB B EB =: 


Calculate slope m,. 
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RREGRESSION ANALYSIS 


REFERENCES / 
SFORMATION 


The regression line computed by the calculator is defined as 
y= mx +b =0.669x + 2.075. The mathematical representation of the line 
constrained to the origin and the data points is y= m,x =0.959x. 


A plot of the input data and the resulting regression lines is shown below. 


10 


Cardiac Output (L/min) 
Method 2 


~w 


0 


Cardiac Output (L/min) 
Method 1 


Note that the data points fit the regression line plotted through them quite 
well (correlation coefficient = 0.959). The fact that the calculated regression 
line does not more closely resemble the line constrained to pass through zero 
indicates a need for additional comparisons at lower levels of cardiac output. 


F. S. Acton, Analysis of Straight-Line Data (New York: Dover Publishing Co., 
1966). 


Personal Programming, pp. V-32ff. 
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10 Electrical 
and Systems 
Engineering, 


introduction 


This chapter contains eight programs of interest in electrical engineering and 
the related field of systems engineering. The Facts/Theory section for each 
program summarizes the necessary background information but assumes that 
you have some familiarity with the subject. In other words, these programs 
will help you learn more about electrical and systems engineering, but they 
are not intended to teach you the subjects from scratch. You may wish to 
consult the references for additional information. 


The first three programs are: 
Series-Parallel Impedance 
Smith Chart Calculations 
Transistor Parameter Conversion 


These carry out practical numerical computations that are often needed in 
AC circuit analysis, transmission-line and waveguide studies, and transistor 
electronics, respectively. You will find that they give greater accuracy in less 
time than conventional methods of doing these computations. 


The next two programs are: 
Bode/Nyquist Calculations 
Root-Locus Calculations 


These are very handy numerical aids for the analysis and design of feedback 
and automatic control systems. The Bode/Nyquist program also can be used 
to study the frequency-response characteristics of a filter or the stability of a 
feedback amplifier. 


The last three programs are: 

Step and Pulse Response 

Convolution 

Discrete-Time System Response 
All of these are simulation programs in the sense that they numerically 
simulate the time response of a linear system — electrical, mechanical, or 
whatever. Over and above their value for analysis work, these programs will 
help you get a better feeling for the relationship between the mathematical 
model of a system and its actual physical behavior. 


As a student or practitioner of electrical engineering, you will probably find 
at least some of these programs to be relevant to your day-to-day work. No 
doubt you will also want to write other programs to tackle problems and 
computations not covered here. In that regard, the programs given here may 
suggest some algorithms and programming techniques that will be of help to 
you. 


ELECTRICAL AND SySTEMS ENGINEERING 10-1 


Facts/ 
THEORY 


THE 
PROGRAM 


Series—Parallel Impedance 


In determining the input or output impedance of an AC circuit, it is often 
necessary to reduce a group of resistors, capacitors, and inductors into a 
single equivalent complex impedance. This program will enable you to 
analyze highly complicated passive circuits in a quick and easy manner if all 
elements are connected in series and parallel. 


Passive networks consisting only of impedances can be reduced to a single 
equivalent impedance. To combine two impedances in series, you add them 
to get the total equivalent impedance. 


Z=Z,+Zyz 


If two impedances are connected in parallel, the total equivalent impedance 
is 


ee ae See a 
Z=Z,1Z5= B +7 at aes 2 


By repeatedly using these two methods, you can reduce a group of 
impedances to one equivalent impedance. 


In general, an impedance is a complex quantity of the form Z=R + jX. This 
program uses Master Library program ML-04 to perform the complex 
arithmetic. 


Prior to using the program, all impedances in series in any branch should be 
combined into rectangular form (R +jX) by separately summing the real and 
imaginary parts. In using the program, you should start by entering the 
impedance most distant from the input terminals. 


Program Keystrokes 
ae OFF/ON 


"ad la 


008 MOH (8) (sto) 5 [R/) [Sto] 6 


Purpose/Comments 


Clears calculator and enters 
learn mode. 


Stores impedance 

Z, = (Ra +jXa). Ra stored in 
memory 9. X, stored in 
memory 10. 


Sl 


Stores impedance 

Zz = (Ry +jXn). Ru stored in 
memory 5. Xz stored in 
memory 6. 
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EDRIES—PARALLEL IMPEDANCE 


016 
024 
058 
079 
115 


(2nd) MOH (2nd) BGM [sto] 7 [R/) 
[Sto] 8 [R/S) 


Stores impedance 
Zw =(Rw +jXw ). Ree 
stored in memory 7. Xy 
stored in memory 8. 


Calls subroutine to 
compute Z,||Zy» and stores 
the result in memories 5 
and 6. 


(SBR) (2nd) HH (Rc) | [St] 5 RA 
[RCL] 


Stores Z, in memories 7 and 
8. Calls subroutine Mi to 
compute Z,||Z, and stores 
result in memories 9 and 10. 


sae 


Recalls impedances to be 
used and places them in Ro, 
Roe, Ros, and R,, and calls 
program ML-04 to compute 
Zz x Zp’ . 


SHEE 


5 fre] 7 (=) 3 Computes Zp +Zy and 
[RCL] 6 (rct] § [=) [S10} 4 stores result in memories 3 
04 (INV) and 4. Calls program ML-04 


to complete computation of 
ZellZy . 


Computes Z, + Zz and 
stores results in memory 5 
and 6. 


Recalls Z, and stores it in 
memories | and 2. Calls 
program ML-05 to compute 
[Zs] and angle of Z, in 
degrees. Recalls and 
displays results. 


Exits learn mode. 


5g 


auae 


CO 180 ) Gx) Ea E) 
12 Re) 11 RA) Re) 12 RS 


ELECTRICAL AND SYSTEMS ENGINEERING 10-3 


() SERIES—PARALLEL IMPEDANCE 


REGISTER Roo Roy Ry 
ConTENTS Ro: — Ro; ML-04, ML-05 Rio Xa 
Ro; Rp Ri, [Zal 
Ros Xp Ry 4Za 
Rae Ry 
Ros Xp 


Enter most “distant” 
impedance, 
Z, =(Ra +jX,). 
Ry Ry 
Xy X, 
Enter next impedance 
to be combined, Z,. 
Rg Ry 
Xp Xi 
If the next impedance 
is in parallel with Zz, 


UsING THE 
PROGRAM 


enter Zy . 
Rr Ry 
Xp Xy 
Compute new 
Za = Ze lZe : New Ry. 
New Xz. 
Repeat until all 
impedances 
have been combined in 
parallel with Zz. 
Compute new 
La = Za\|Zu- New Ry. 
New X,. 
OR 
Compute new New R,y. 
Za =Za+Zn. New X,. 
Compute} Z, |and the IZa| 


angle of Z,. 


ime re, Sia SO Ss as gn 
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PROBLEM 


Find the total equivalent impedance for the following circuit. 


7.,=0- j7 


Enter program. 

Fix decimal for desired 
accuracy, 

Enter most distant 
impedance, Z,. 

Enter next impedance, 
Lows 

Compute new 

Zy = 7Z,||Ze. 

Enter next impedance, 
Z,. (Choose any of the 
three.) 

Enter next impedance, 
Le 

Compute new 

Zy = Z, |Z,. 

Enter next impedance, 
Zs. 

Compute new 

Zu = Zy||Zs. 

Compute new 

Zy = Za + Zp. 

Enter last impedance, 
Liege 

Compute new 

Za = Zs ||Zun. 


Display polar form if 
desired. 


ae nal | 
| Se pg 
SI 


3 [P] 


aoe 
se 


Bl Bed 
3 =| 


al ges 


So) 
—) 

a 

3 5 


al) ae 


a 


0.00 


1.00 R, 
2.00 X, 
3.00 R, 
—4.00 X, 
2.00 Ry 
1.50 X, 


0.00 R; 
8.00 X; 


6.00 R, 
0.00 X, 
3.84 Ry 
2.88 Xp, 
0.00 R; 
—7.00 X; 
5.93 Rg 
— 0.64 Xz 
7.93 Ra 
0.86 X, 
10.00 R, 
5.00 X, 


4.57 Ra 
1.20 X, 


4.73 |Zal 
14.67 x Z, 
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Facts/ 
THEORY 


Smith Chart Calculations 


Graphical constructions on the Smith Chart require some special techniques, 
and it can be difficult to obtain accurate results. The program given here 
performs various transmission-line calculations equivalent to the graphical 
constructions on the Smith Chart. The program makes provisions for lines 
with attenuation and complex characteristic impedance. Thus you can obtain 
accurate results quickly and easily with your programmable calculator. 


Consider a transmission line with characteristic impedance Z, (possibly 
complex). The normalized impedance (z) at any point will be the impedance 
Z at that point divided by Z, (z=Z/Z,). Let the normalized distance in 
wavelengths from the load end of the line be x =d/X. Then the per- 
wavelength phase constant is given-by 
b= BA = 27 (radians) 

and the attenuation constant is 

a=8.686aA (dB per wavelength) 
where a is the attenuation factor (nepers per unit length). | 
This program has numerous subroutines which will perform different 
calculations depending on the various inputs. The following terms are used in | 
many equations and will be defined here for convenience. 


Ls — characteristic impedance 

Z —  impedance® 

Zz — normalized impedance® 

Y —  admittance® 

P — reflection factor® (rectangular coordinates) 
|P|.4P — reflection factor® (polar coordinates) 

Kata — position of the first voltage minimum 

0 — voltage standing wave ratio (VSWR) 


°Note that a subscript of “L” indicates values at termination, and a subscript | 
of “i” indicates values at input. 


SLoTTED-LINE MEASUREMENT OF TERMINATION IMPEDANCE } 
Assuming a low-loss line, the termination impedance 
Z,, = Re(Z,) +j Im(Z,,) } 


is calculated by the following sequence. 


IP. = 5.PL=T +A in 
1+P Bs 
=i _p. Zy.= ZoZ1, 


wt a at a es ec” 
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ITH CHART CALCULATIONS 


REFLECTION FACTOR AT TERMINATION 
Given the termination impedance 

Z,, = Re(Z,) +j Im(Z;,) 
or admittance 

Y, = Re(Y.) +j Im(Y,) 


the complex reflection factor is calculated as follows. 


ZL= - (if YL entered) 
= Zi eee! 
say Pua FT 


InpuT IMPEDANCE 
Given Z, and P, from a previous calculation, the input impedance 
Z, =Re(Z;) +j Im(Z;) 
at distance x from the termination is computed by the following sequence. 
IP,| =IP,,1 (10°°#)" 4 Pi =4P.L—4ax 


> VLR ve 

“> exp; Z, =Z,2, 
Note that this sequence applies in the reverse direction (from Z, to Z,) if x is 
entered as a negative quantity. 


ADMITTANCE, VSWR, ANp VoLTAGE MINIMUM 


The following calculations are the same for either input or termination 
values. 

1+I/P| 

—|P| 


Y= 


o= 


_ 


ell is 
Xmin = tn\* P ) 
EQUIVALENT SHORT-CIRCUITED LINE 


Given Z, from a previous entry or calculation, the length x,., of a low-loss 
short-circuited line whose input impedance equals Z, is given by 


Kor = ge tan”'[Im(z,) —jRe(2.)] 


Note that, if Im(x,.1) #0, there is no exact equivalent. 
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THE 
PROGRAM 


SS SSS Se FE OS SE Pn TT PS EEA 


SmitH CHart CALCULATIONS 


SInGLE-Stus IMPEDANCE MATCH 


Given P, from a previous calculation, the following equations compute the 
insertion position, Xi;ne, and the stub length, x,.u», such that Z=Z, at x=Xijne- 


Kine =2[P. +cos-'(—|P11)] 


|P’|=|P,] (10-°?8)*tine 
5.P’= 4 Py —4mXiine 


Pees 
1—P’ 
i 


Xstub = 5 tan '{[im(1/2")] “tt 


Q7 


Note that the stub is assumed to have the same parameters as the line, which 
is assumed to be low-loss. 


The following program is designed to do these calculations for you. The full 
program exceeds the capacity of the TI Programmable 58 calculator. 
However, by omitting subroutine ES which COMputeES Xj jne, Xstuv, the 
program can be used on the TI Programmable 58 calculator if you repartition 
the calculator (press 2. ad] 17) before you key in the program. 


| Step # Program Keystrokes 


ae OFF/ON 


ee Pe ee a ee ee 
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Purpose/Comments 


Clears calculator and enter 
learn mode. 


[2nd] MEE (2nd) ME (2nd) EE [2nd] 
a 4 (Xx) 2nd) a (=) [S10] 19 
1 (S10) 12 [S10] 13 RA 


Initialize routine. 
Clears memories and puts 
calculator in radian mode. 
Stores 47 in R,,. Enters 

default values 10°°'*=1, 


Re(Z,) = 1. 


Stores Re (Z,) in R,3 and 
Im(Z,) in R,,. Computes 
10-°-!* and stores it in R,:. 


Computes Z. 
Stores o in Ry. Computes 
|P.|=(o—1)/(o + 1) and 

stores it in R,,. 


MITH CHART CALCULATIONS 


—— Keystrokes Purpose/Comments 


10 (XJ (Rey) 19 (4) Lend) Computes 4 Py =7+47Xmin 
a [sto] 16 and stores it in Ry,. 


(2nd) MOM (2nd) PR (Ret) 15 [zt] 
16 (204) Ee 

6 [sto] 2 GA) 

4 (2) [s10) 5 (sto) | G4) 
3 (2nd) MM 2) (2nd) BM 23 


Converts P to rectangular 
coordinates. 

Stores Im (P) in R, and R,. 
Stores —Im (P) in R,. Stores 
Re (P) in R,. Stores 1 + Re(P) 
in R, and 1—Re(P) in Ry. 


ees 


GO (4 (2nd) BGM (Sto) 7 [z:t] 
08 

13 [Sto] 3 [Ret] 14 [Sto] 4 [2nd] 
04 (CC) (Sto) 17 [1Nv) [ser] (zt) 
18 [R/S] 


iH (2) 
17 {sto} 1 [R/S] (Sto) 18 [sto] 02 


Em (=) (Re) 13 [St] 3 
] 14 [Sto] 4 (2nd) BI 04 
(2nd) MGI (sto) 7 [Sto] 3 [z:t] [sto) § 
sto] 4 (2nd) MOM 31 (2nd) EM 23 


Computes z =(1+ P)/(1—P). 

Stores z in R,, Rg. 

Aaa Z, and computes 
=2Z,. Stores Z in Ry;, Ris. 


| BS iD in 
a6 
sbage 


Computes P;. 
Stores Z,. 


4 
() 


Recalls Z, and stores it for 

complex division. Calls 

ag ML-04 to compute 
=Z,,/Z,. Stores z,. Stores 

Re (z.)—1 in R, and 

Re (z,,) +1] in R;. 


Computes P,, =(z,— 1) + 
(z+ 1) and stores it in Rs, 
R,. Converts P,, to polar 
coordinates and stores 4 P, 
in R,, and!P,| in R,s. 


Computes Z= 1/Y. 
Stores Y in R,, R.. Calls 
ML-05 to compute Z=1/Y. 
Stores Z in Ry;, Ris. 
Transfers to C4] to 
compute P. 


Computes Y= 1/Z. 
Stores Z in R,, Ro. Calls 

ML-05 to compute Y= 1/Z. 
Displays Y. 
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SmitTH CHART CALCULATIONS 


Program Keystrokes 

(2né) HO [Cc] [Sto] 10 

Cx fra) 19 (=) [nv] Som 16 
CO ke) 12 GD) FQ 10 0) 
[2nd] MH 15 (GTO) (2nd) GD 


Purpose/Comments 


Computes input 
impedance at x. 
Stores x. Computes 
~P,=4 PL —4nx. 
Computes 
|P,|=|P,|(10-°49., 
Transfers to subroutine 
EM to compute Z;. 


Computes ¢ and Xin. 


_ 1+IPl 
Computes o= T=|pj2"4 


stores it in Ry. 


Computes 
Xmin= (4.P—27) / 42. 
Calls subroutine EM to 
force Xmin 0. StOres Ximin in 
Rice 


If x=0, transfers to 
HEM . if x<0, adds 0.5 and 
repeats testing until x20. 


Displays P. 
Displays|P|. Converts # P 

from radians to degrees and 
displays x. P. 


Computes Xs). 
Stores Im (z,) in R, and 
—Re (z,) in R,. Calls 
ML.-06 to compute 

tan ~?[Im(z.) —j Re(zz)]. 
Divides Re (X«e1) by 27. 
Calls subroutine EE 
to force Re (xs.:)= 0. 
Stores Re (x,.)) in Rio. 


Divides Im (x.¢1) by 27. 
Calls subroutine El to 
force Im (Xg¢))=0. 

Stores Im (x,¢) in Ris. 


ies ea aaa 
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SimirH CHART CALCULATIONS 


REGISTER 
CONTENTS 


L Loi | Le Computes Xjjne and Xstuv- 
[ROL] 15 [INV] cos” '(—|P, 
Teskes Computes xing So al 
| x=t} 10 Calls subroutine EZ to force 


Xjine 220. Stores X;jne in Ryo. 


(c] [Rc] 7 (Sto) 1 Ra) g 2 Calls subroutine to 
Ga 05 CE) 2) (INV) compute z’. Stores z’ in R,, 
i Se Ea (=) R;. Calls ML-05 to compute 
| x= | 11 1/z’. Computes 


tan“'[Im(1/z’)]") 
Xstub = Qer 
Calls subroutine EM to 
force Xsru» 0. Stores Xsrup in 
Riz 


Exits learn mode. 


Roo Ric &) Xatns Xeor> Xitve 
Ro, Used Ri, — Im (Xse1), Xseub 
Roe Used Re. lOc 

Ros Used Ry, Re (Z,) 

Ry, Used R,, Im(Z,) 

Ros Re (P) R, {PI 

Ros Im (P) Ry 4? 

Ro; ‘Re (z) R,; Re (Z) 

Ros Im (z) R,, Im (Z) 

Rag o Ris 4r 
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SmiTrH CHART CALCULATIONS 


Procedure 


Initialize. 
Enter Re (Z,). 
Enter Im (Z,). 


Enter attenuation, a, 
in GB. 


Note: the above three 
steps may be omitted 
if you are using the 
default values for Z, 
and a. 


Display/Comments 
i 
Re (Z,) 


A | 
Re (Z,) 
Im (Z,) 
a 


Im (Z,) 
10-°:'" 


To calculate Z, from o 
and Xmin- 
Enter o. 
Enter Xmin- 


(o+1) 
Re (Z,) 
Im (Z,) 
To calculate P from Z. 

Enter Re (Z). 
Enter Im (Z). 


Re (Z) 

|P| 
4-P in degrees. 
To compute P from Y. 
Enter Re (Y). 
Enter Im (Y). 


Re (Y) 
IP| 

4-P in degrees. 
To calculate Y. Note 
that Z, should be 
stored in R,;, Ris 
before using this 
subroutine. May be 
used after [A] or 
} Re (Y) 
Im (Y) 
To find Z; from x. 
Note that this 
subroutine should be 
used after [4], 
,or Ml. 


Enter x. 
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3TH CHART CALCULATIONS 


To compute o and 
Xmin- Note that this 
subroutine should 
be used after 


(8), MM or [C). 


To calculate P. Note 
that this subroutine 
should be used after 
CA] or : |P| 
4P in degrees. 


To calculate x,.,. Note 

this subroutine should 

be used after [4], 

(8) , , or (ce). Re (Xse1) 


Im (Xse1) 


To calculate x;\,. and 
Xstup- Note that this 
subroutine should be 


used after CA], : 
or a. 
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SORT D> 
SAMPLE 
PROBLEM 


SLT CI IDET ALE LEE IER RE TEL EIT ETC, BET OV TOE 8 ELL LI ELIE LE 


SmiTH CHART CALCULATIONS 


(a) Find Z, and P, given Z,=50+j0, a=0, o=3.7, and xi, =0.106. 
(b) Find x,., given Z,=300+j0, a=0, and Y, =0+j0.012. 
(c) Find oandx,;,, and Y; at x=0.2, given Z,=50+j0, a=0, and 


Z;, = 30 + j20. 


(d) Find x;,,. and X.,u» given Z, =50+j0, a=0, and Y, =0.015 — j0.025. 
(e) Find oat x=0 and Z and oat x=15 given Z, =50+j0, a=0.4, and 


Enter program. 


Fix decimal for desired 
accuracy (we'll use 3). 
(a) 
Initialize. 
Enter Re (Z,). 


Since Im (Z,) and a 
both equal zero 
(default values), we 
need not enter these. 


(2nd) 3 


(2nd) 


50 RA) 


Enter o. 


Enter Xmin- 
Compute P,. 


(b) 

Initialize. 
Enter Re (Z,). 
Enter Re (Y,). 
Enter Im (Y;). 
Calculate x,.). 


1.000 
50.000 


4.700 (o+1) | 
20.914 Re (Z) | 
— 34.848 Im (Z) 
| 

0.574 IP, | 
256.320 + P,in degrees. 


1.000 

300.000 

0.000 

1.000 |P,! 
0.457 Re (Xsc1) 


0.000 = Im (x,.1) 


ee ee ae eT es 
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SimitH CHART CALCULATIONS 


(c) 

Initialize. 
Enter Re (Z,). 
Enter Re (Z,). 


Enter Im (Z,). 


Compute o. 


Compute Xmin- 


Enter x; and 
compute Z,. 
Compute Y,. 


(d) 

Initialize. 
Enter Re (Z,). 
Enter Re (Y,). 
Enter Im (Y,). 


Compute Xj ino. 
Compute Xgrup- 


(e) 

Initialize. 
Enter Re (Z,). 
Enter Im (Z,). 
Enter a. 
Enter Re (Z,). 
Enter Im (Z,). 
Calculate o. 
Enter new x. 


Calculate o. 


® BES Ssh 
3 | 5) gy 


Se} BR B*® 
5 © 


ST 


— 
TO 


015 [2nd] 
025 G4) 
ka 


s)@s: 


ssncoug 
Beers 


ese 
el 


Le | 


107 04 


\Pl at x=0. 

o atx=0. 

Re (Z) at x= 15. 
Im (Z) at x= 15. 
oat x=15. 


'REFERENCES/ H, H. Skilling, Electric Transmission Lines (New York: McGraw-Hill, Inc., 


InrorMATION 1951), chapter 12. 
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Transistor Parameter Conversion 


Since manufacturers’ data sheets often provide the low-frequency (real) 
hybrid parameters of a transistor in only one configuration (CE, CB, or CC), 
it may be necessary to convert the h-parameters from one configuration to 
another. The following program will perform these conversions for you. 


The hybrid or h-parameters are defined as 
v, =hyi, +hiv. 
ip = hei, + hove 


Facts/ For a common base (CB) configuration, the equations are 
THEORY 


Veo =hipie + hyeVer 
ic =hypic + howVev 

The equations for a common emitter (CE) configuration are 
Voe = Nieit + HreVee 
ic = hreip + oeVee 

For a common collector (CC) configuration, the equations are 
Voc = Dicin + NoeVec 
i. =hycin + hocVec 


The program listed below utilizes four subroutines to make the necessary 
conversions: 


| Subroutine | Conversions __| Calculations Performed 


Common Collector to h,. =h,. 
Common Emitter h,.=1—h,, 


hy. = — (1 +hy.) 
hoe =hoe 


Common Emitter to 

Common Base 

_biehoe —hyo(1 + Dre) 

D 

ai h,.(1 = h,.) —h,.h. 
D 


hy, 
hi 


oe 
hop a 


D . 
where D= Ql + hy.) (J —hye) +hyeho. 
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Common Base to 
Common Collector 


Common Collector to 

Common Base 

Dre(1 = hye) + hieloe 
D 


h _h, (1 +hy<) —hychge 
{0 = D 


hyp = 


where D=h,.h,. —hy,h,. 


To use the program you must enter the h-parameters you know in the order 
his, hie, hy:, and h,,. Results will be displayed in the same order. 


Program Keystrokes Purpose/Comments 


OFF/ON [Rs] Clears calculator and enters 
learn mode. 


THE 
Procram 


|B | 5 [nv] Divides by D to find his, hy», 


Prd 1 [inv] 2 [INV] hry, hop, and hie news Die hye 
3 
016 = 1 | Displays h,, and stops. 


a 


| ose | 2 Displays h,2 and stops. 
| 026 | 3 Displays hz, and stops. 


4 | Prt Displays hz, and stops. 


ee ee a lk ei Re 
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TRANSISTOR PARAMETER CONVERSION 


| Step # | Program Keystrokes 


(2nd) ME (2nc) MM 1 (+) RY 3 
EW H 16) k&& 20) 
Re] 1 (Xx) Re) 4 (=) (0) 5 


Purpose/Comments 


Calculates divisor (D) for 
subroutines and [C), 


Initializes program by 
clearing display and 
memories and selecting 
scientific notation and fix-2 
display formats. 


Stores beginning data, h,,, 
hye, hey, hy». Note: Data must 
be entered in this order. 


Converts CC data to CE 
configuration. Transfers to 
HH to recall new values 

from memories | through 4 


ERE) 


i Lc Converts CE to CB 
4) 2 a) configuration. 
3 E) So) 6 3 
SI 2-3 1 
Ra) 4 (=) [sm] 3 6 
Le 


BE/GXARAR) Bae 


b (inv) Converts CB to CC. 

| GW) Ged) OM 4 RG) 3 
15 w@ 5 6 
MeOi Poems | 
SO) 3 RG) 6 SO) 2 GTO) Gna) Ow 


ee Ee a ee ee eee ee 
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FREGISTER 
“CONTENTS 


UsINc THE 
[PROGRAM 


MO (0) [rct) | (X) [Ro 4 
Re] 3 x) ko) 2g E&) 


| 
Cc 


ERO ENDER 


Roo R,, D 
Ror hi Ros Used 
Ros h 12 Ro: 

Ros ha, Ros 

Ros lino Roo 


Procedure 


Initialize program. 


Enter data. 


hy, 
hye 
ho, 


Select desired 
conversion. 


ARBRE IRRE 


°This value is printed if the PC-1OOA is used. 
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Purpose/Comments 


Converts CC to CB. Steps 
181-194 calculate and store 
divisor (D) for later use in 

the division subroutine, ME, 


Program Keystrokes 


0.00 00 Clears display 
and data 
registers. Sets 
scientific notation 
and 2-decimal 
modes. 


* Converted value. 
° Converted value. 
° Converted value. 
° Converted value. 
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Given the CE hybrid parameters 


he= L7k2 h;. = 180 
h,. =2.5x10" h,. =2.3x10°° siemens 


SAMPLE find the CB and CC parameters. (Refer to Facts/Theory section for a 
PROBLEM discussion of the following equations.) 


Vie = Diein + hyeVew 
ic= hein + hoeVoce 


Using matrix notation, these become 


hy, hy he h.. | 1700 2.5x10-* 
hs; » bss hee, dig 180 2.3x10°° 
Display /Comments 

Enter program. 0 
Initialize program. CE] 0.00 00 
Enter h values in CE 
configuration. 

17 1.70 03 

2.5 [EE] 2.5 00 

4 2.50 —04 

180 1.80 02 

2.3 [EE] 2.3 00 

6 2.30 —06 
Convert from CE to (3) 9.39 00 hy, 
CB. 

—2.28-04 hy 

-9.94-01 hy 

[R/S] 1.27—08 hop 
The values in CB 
configuration are 1.70 03 hy. 
stored in memory 1.00 00 h,, 
registers ] through 4, -1.81 02 h. 
so you can now 2.30-06 h,. 


perform the 
conversion to CC. 


If you press [A] now, you'll get the CE parameters again. 


Rererences/ J. A. Walston and J. R. Miller, Transistor Circuit Design (New York: 
InrormaTion McGraw-Hill Book Co., 1963), chapter 6. 
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sode/Nyquist Calculations 


OBJECTIVE 


Facts/ 
“THEORY 


Given a transfer function or immittance function as a ratio of polynomials, 
this program calculates the data needed for Bode and Nyquist plots for 
specified frequency values. 


Given the transfer function or immittance function 


Hs) = Pet bis + *** +b,s™ 
Q@ +a,s+ °°* +a,S" 
the program calculates the Bode-plot data 
Hyp = 20 logio|/H(jo)| 
4H=arg [H(je)] (degrees) 
and the rectangular and polar Nyquist-plot data 
H, = Re [H(jo)} |H| =|H(je)| 
H,=Im[H(jo)] 4 H=arg[H(jo)] (degrees) 
Data may be calculated at a single frequency () or at multiple frequencies 
(w= w, +nAw). The method used is to substitute jw in H(s), giving 
_ bo tbi(jw) +... ba(jo)™ 


H(j#) = 3a, (jo) + Te aa)" mSn<7 


The real and imaginary parts of the numerator are 

N, = bp — b.@? +b,w' — b,w® 

N, =@(b, — b,@? + b,w* — bw?) 
For the denominator the real and imaginary parts are 

D, = ao — a2@* + .a,@' — a,w* 

D, = (a, — a,” +.a,0* — a;,w*) 
By substitution 


_ 1 Ne +iN 
sell as BRE 0} 


where b,; =0 if m<7, etc. 


Multiplying by the complex conjugate. 


___N-+jN, [D-—jD, 
H(§j*)= D+], |D, =D, 


gives 
D.N-+DiN, _ DNDN, 
ape! ADEE 


eee ee eee eee 
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BopE/NyQuist CALCULATIONS 


By rectangular to polar conversion |H| and = H may be calculated. 
This program also applies to frequency response functions of the form 


bo + bi (jf) + . . . ba(jf)™ 
a +a,(jf)+ ... an(jf)” 


simply by entering f or f, instead of w. Note the similarity in the four 
equations for N,, N,, D,, and D,. They all have the form 


H(f)= 


c— dw? + ew* — fw® 


where c, d, e, and f are some constants. Since the coefficients of these four 
equations are stored sequentially, the program will use indirect memory 
addressing and a subroutine to calculate N,, N;, D,, and D,. 


eicva Keystrokes 


sep] 
BS cl 


Purpose/Comments 


Clears calculator and enter 
learn mode. 


Calculates equations in the 
form of c —dw* + ew! — fe". 
Recalls a’s or b’s indirectly 
from memory 8 


Hee 


Increments memory 8 by? 
to recall even- or odd- 
numbered coefficients. 
Increments memory 9 by! 
to recall proper power of ¢ 


Initializes memories for 
indirect input of a, values. 


Stores values of a; 
sequentially, beginning in 
memory 0) (a) stored in 
memory 0, a, stored in 
memory 1, etc.). Memory 
used for loop to prevent 
entry of more than seven | 
coefficients. 


BHglee) daee 


etl 
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Purpose/Comments 


Program Keystrokes 


(2nd] MEM (8) 8 [S10] 08 10 (S10) 9 


Initializes memories for 
indirect storage of b; values, 
and then stops for entry of 
first value. 


Goes to subroutine ME for 
indirect storage of b’s. 


Begins single-frequency 

calculations. Stores w; then 
calculates and stores w’, w', 
and w*, 


Initiates memory 8 and 
calculates D,. D, and D? 
stored for later use. 


Initializes memory 8; 
calculates and stores N,. 


Initializes memory 8; then 
calculates and stores D, and 
D} + D?. 


1 (sto) § (2nd) ME (Xx) 
[sto] 24 (x?) SUM 26 


22 [RCL] 23 24 Calculates and stores 


ea 25 (=) =) Bl 26 _D,N, +DiNi 
(=) 0) 27 "> D?+D} 


Calculates and stores 
_ DN, —DiN, 
D?+D? 


Displays » and stops. 


27 [:t) [Ret] 23 [Nv] EZ | Bode-plot data 


3 
Ea) a 


| Pit Displays 4 H and stops. 
(x21) ca 20 (=) Gad) Displays Has and stops 
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10 


REGISTER 
ConTENTS 


BopvE/Ny Quist CALCULATIONS 


see Program Keystrokes Purpose/Comments 


(2nd) MO (0) (RO) 27 (2nd) MM RS) | Nyquist-plot data 
Displays H, and stops. 


Displays H, and stops. 


Displays =— H and stops. 


Displays|H] and stops. 


Increments » and Aw (for 
multiple-frequency 
calculations) and transfers 
to [£] to generate new 
values. 


Begins multiple-frequency 
calculation. Stores Aw; then 
transfers to CC] for storage 
of @, and calculation of 

data. 


Note: Print commands may be omitted if the PC-100A is not used. 


Roo —Ro; a; Values, as needed 


Reit@ 
Ros \ looping and indirect Res” “D> 
Ros memory addressing R: N,, Hy 
R,.—Ri; b, values, as needed Ry. D; 
Ris w Ro, Nj, 
Rus w? R,, D?+Dj; 
Ras w* Rye Be 

Rox 

R,, Aw 


A ee OE Se ee ee ee er 
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IBopE/Nyeuist CALCULATIONS 


UsING THE 
PRoGRAM 


Set decimal for desired 


accuracy. 
Initialize and enter a 
values. 


Continue until all a 
values are entered. 


Initialize and enter b 
values. 


Continue until all b 
values are entered, 


For single-frequency 
calculations: 
Enter ©. 
Generate data. 


el 


S555 55 * 


ELECTRICAL AND SYSTEMS ENGINEERING 


If N>7, the 
display will show 
a flashing 7 to 
indicate that 
polynomials 
above the 7th 
order can’t be 
handled. 


or flashing 7 if 
n>7. 


Bode data. 


Nyquist data. 


oa SS a ET ETE 
10 BopE/NyguistT CALCULATIONS 


Display/Comments 


For multiple-frequency 
calculations: 
Enter Aw, 
Enter w. 
Calculate data. 


°This value is printed if the PC-100A is used. 


Calculate the Bode- and Nyquist-plot data for 


a 100 
Hi(s)= 100 + 5s + s* 


atw=8,10,... 


SAMPLE 
PROBLEM 


Display/Comments 


0 


0.00 We'll use 2-place 
decimal for 


convenience. 
Initialize and enter a 8.00 (Used for Dsz 
values. loop.) 


100.00 a (Stored in 
memory 0.) 
5.00 a, (Stored in 


memory 1.) 
1.00 a, (Stored in 
memory 2.) 
Initialize and enter b 10.00 (Memory location 
values. (There is only for by.) 
one b value in this 100 100.00 b, (Stored in 
example.) memory 10.) | 


Enter Aw and select 2 [2nd] 2.00 
multiple-frequency 
calculation. 


Sa eee Oe ee 
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BopE/Nyguist CALCULATIONS 


Procedure pene ee Display/Comments 


8.00 w, 
— 48.01 x H 
5.38 Hap 
1.24 H, 
—1.38 H, 
— 48.01 x H 
1.86 |H| 
10.00 w, 
— 90.00 7 H 
6.02 Hap 
0.00 H, 
—2.00 H, 
— 90.00 x H 
2.00 |HI 
12.00 w, 


oo 
ta 


Enter wy. 


Bode data. 


Nyquist data. 


SSIS IS Ses sel ss 


Continue to press until you have generated all the data sets you need. 


IREFERENCES/ Dean K. Frederick and A. Bruce Carlson, Linear Systems in Communication 
lINFormation and Control (New York: John Wiley and Sons, Inc., 1971), chapter 11. 
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Root-Locus Calculations 


program calculates the following root-locus parameters: asymptote 
intersection point, asymptote angles, departure angles from complex poles, 
and arrival angles at complex zeros. 


aa Given the open-loop poles and zeros of a linear feedback system, this 


OBJECTIVE 
HL (s—z, ) 
Given FQ) = ————_ msn—-1 
Ay ee 
bal (S— Px) 


where z, are the zeros and p, the poles of F (s), the root-locus has n—m 
Facts/ asymptotes intersecting at 
a 
l n m 
%=T=m | 2 Px — 2, Z1) 
k=1 


Lj an 
at the angles vy = (y—1):360°) v= 1,2, ....,n—m 


The departure angle at any complex pole p, is 


m n 


2,= > 4(ps 21) — > (ps —px) + 180° J=1, 2,...,n 
i=l k=1 


k¥J 


The arrival angle at any complex zero zx is 


Ox =— > 4(zx-z,)+ D> & (zx — px) — 180° K=1,2,...,m 
ivk ~ 
The following program computes 05, ¥,,,®;, and Ox for systems no greater 


than 6th order (n<6,m <5). We assumed a real system in the program so 
that complex poles or zeros always have complex-conjugate mates. Thus 


D p= > Re(p,) and DS z= Re(z,) 
k=] k=1 i=] 


i=] 


You will note in the computation of the sums for ®,; and Ox the terms 

aps — ps) or x (Zk — Zx) 
are included in the summations. Since the rectangular to polar conversion 
will give an angle of 45° for the point, (0,0), a test was put in the program to 
insure that 0° is added to the sums when p, = py Or Z; = Zx. 


eel ee ee Reet 
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Root-Locus CALCULATIONS 


THE 
PROGRAM 


Step # | Program Keystrokes Purpose/Comments 


OFF/ON [BN Clears calculator and enters 
learn mode. 


[A] 04 5 01 Stores n. Stores starting 


11 2 [Rc] 4 memory locations for 
storage of p’s. Recalls n and 


stops. 


Stores Re(p,) and Im(p,) for 
k=], 25-50% 


Stores m. Stores starting 
memory locations for 

storage of z’s. Recalls m and 
stops. 


Stores Re (z,) and Im (z;) for 
i=], 2)... ... iM: 
LO | 
L Ub | Calculates intersection 
Mim [Rci) point, 0». Initializes 
18 registers for loops. 
| to! | n 
fr] Computes = Re (pi) — Re (z,). 
| Op | x 
Note that Re (z,)=0. 
Ro] 4 (=) ko) 17 E&) SO 0 Stores n—m in Ry. 
3) kd 0 E) BS Completes computation of 


Oo. 


Computes ¥,. 
Computes y,,... ,,. Note 


= 360 
that ¥, =, += 


ee ee en eee 
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10 


Root-Locus CALCULATIONS 


Program Keystrokes 

(2nd) ME CO) (+) 4 (=) S10) 23 
(+) 6 ) So) 29 0 SO) 3 Lng) 
Mm 0 (Rc) 4 (S10) 00 5 [Ser] SUM 


3 C4) 180 C=) Gnv) [see] 


Me) 113 Se OO) 


58 


BARE Be 


Purpose/Comments 


Computes ®, or Ox. Stores 
register number for Re (p,) 
and Im (p,;) or Re (zx) and 
Im (zx). Calls subroutine 
SUM to compute 


2 (Ps — Px) or 
2 # (2x — Px). 


Multiplies sums by —1. 
Call subroutine SY to adc 
sums 


m 


= 4p; —z,) and 


i= 
m 


= 4 (Z_— Z)). 


i= 


Adds 180 to final sums. If 
computing ®,, displays %; 
and stops. 


Calls subroutine [2] to 
compute — Ox. Displays 8 
and stops. 


Stores starting register 
numbers for p, or Z;. 


Clears t register and unsets 
flag 1. Computes the real 
component (x-value) of 
(Pj — Px) Or (%K — Z;) and put 
it in the t register. If x=0, 
sets flag 1. If x #0, transfers 
to 209. 


a a a a ee 
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A00T-Locus CALCULATIONS 


(Ret) ms 29 (=) Computes the imaginary 

mm 2 =) oy) 1 223] component (y-value).If flag 1 
not set (x #0) transfers to 
223. If flag 1 set (x=0), tests 
to see if y=0. If y=0, 
transfers to 225, 


If x and y are both zero, 
adds zero to sum in register 
3. If x and y are not both 
zero, does rectangular to 
polar conversions and adds 
the angle to sum in R;. 
Loops n or m times, as 
needed. 


Exits learn mode. 


REGISTER Reo Used Ry; m 

(CONTENTS Res Used Ris—Rez Re (z;) 
Ro» Used Ras Used 
Ros Used Roy — Ros Im (zi) 
Roy n R Used 


Ros = Rio Re (Px) 
R,,—R,i, Im (px) 
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Root-Locus CALCULATIONS 


Enter the number of 


EY, poles, n. [A] n 
UsING THE Enter py. 
Re (p:) Re (p:) 
Im (p,) Im(p,) 
Re (Pa) Re (p,) 
Im (p,) Im (p,) 
Enter the number of 
complex zeros, m. (8) m 
Enter z;. 
Re (z;) Re (z,) 
Im (z,) Im (z;) 
Re (Zm) Re (Zm) 
Im (Zm) Im (z,,) 
Calculate asymptote 
intersection point. (ce) 0. 


Calculate asymptote 
angles. 


wW, in degrees 
wy, in degrees 
° 


BG 


5 
< 


in degrees 


Calculate departure 
angle. Enter pole’s 
subscript, J. 


A 


in degrees 


Calculate arrival 
angle. Enter zero’s 
subscript, K. ; in degrees 


i ee ee en + ee 
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\ooT-Locus CALCULATIONS 


Find the root-locus parameters of 


F(s)= [s—(-—5+jl)]s-(-5-j)] 
“ [(s—0)] [s—(—2 +3) ] [s—(—2-j3)] [s-(-4)] 


SAMPLE 
PROBLEM 


Enter program. 


BI 


Enter n. 


Enter poles. 


5 


wNorkRWNWNO SO 
El SHRHRRRES 
sl & 


Enter m. 


Enter com plex Zeros. 


5 GA) ks) 
1 4) 

5 G4) ks 
1 G4) ks 


Im (2:2) 
Calculate intersection 
point. 


Calculate asymptote 
angles. 


a8 fe) 


Calculate departure 
angles. 


elle 


Calculate arrival 
angles. 


a 


eee a Se eee ee Ee 
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Root-Locus CALCULATIONS 


Graph of Root Locus 


imaginary 
axis 


real 
axis 


REFERENCES/ DD. K. Frederick and A. B. Carlson, Linear Systems in Communication and 
INFORMATION Control (New York: John Wiley and Sons, Inc., 1971), chapter 10. 
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Step and Pulse Response 


If you know the impulse response h(t) of a linear system, it is possible to find 
the unit step response and the rectangular pulse response. The following 
program gives the value for the time interval (T) and the step or rectangular 
pulse response, whichever you select. 

OBJECTIVE 

The unit step response is given by 


y(t) =] h(A)dd 


The integral will be evaluated at t=T, 2T, 3T, etc., using Master Library 
program ML.-09 (Simpson’s Approximation) to approximate the integral. 
You'll choose an even integer ny (the number of divisions from 0 to T that the 
approximation will use). The time between divisions is T/n, =A, and the 
program increases n=t/A to keep A constant as t increases. 


Facts/ 
THEORY 


h(t) 


0 T 2T 3T ete. 


The rectangular pulse response is found in the same way as the unit step 
response, until t=7 is reached. At that point the lower limit becomes wT —T 
and the upper limit wT. The next value of the integral is from wT —7 + T to 
(w + 1)T, ete. 


h(t) 


Input some whole numbers of T’s 


(w+1)T 


Before running the program, you must enter a subroutine to evaluate h(t) as a 
function of t. To test the numerical accuracy, you should recompute at least 
one point with the value of np doubled. 


pe ee De ae 
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Program Keystrokes Purpose/Comments 


OFF/ON Clears calculator and enters 
learn mode. 
PROGRAM aa 


STEP AND PULSE RESPONSE 


(2nd) MOH (2nd) EM [2nd] WO 9 [0] 
2 (2nd) MMM (R/S) [RCL] 4 [2nd] 
[R/S] [RCt] Q SUM 2 [INV] [SBR] 


1H (A) St) 2 SO) 0 GR) 
570] | (5) Gnd) HO 9 (C) RA 


Computes integral with 
Simpson’s Rule. 


=H 


B) 
2 
a 


Stores T and n,; then starts 
integration for unit step 
response. 


a 
° 
el 


a 


Enters 7 for rectangular 
pulse response and sets flag 
0 for testing later. 


ENE 


Calculates new h for next 
integration; checks to see if 
flag 0 is set. If so, transfers 
to MGB. If not, repeats 
integration. 


Checks to see if T= t. If 
so, transfers to CC]. If not, 
continues on for new 
integration, 


Stores t—7T as new lower 
limit; then calculates and 
stores new A=T/np. 


Stores original n in memory 
5, and then loops to 
calculate mT and value of 
integral from wT —T to wT. 
Adjusts data for next run. 


Labels subroutine for 
calculation of h(t). 


Note: Print commands may be omitted if the PC-100A is not used. 


a a ee ee eS 
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STEP AND PuLSE RESPONSE 


REGISTER Rieger T 


ConTENTS R 


UsING THE 
) PRoGRAM 


Procedure 


Enter subroutine to 
calculate h(t). Assume 
that t is in the display, 
and enter keystrokes to 
evaluate function. 


End subroutine with 
return command and 
exit learn mode. 


Enter T. 
Enter n,. 


For unit step response, 
I 
proceed by pressing 


Continue to press 
for new values. 


OR 
For rectangular pulse 
response, enter T. 


Ros n 

Ros No 
Ro; T 

Rox 

Row 


(G10) [2nd] 


keystrokes for 
h(t) calculation. 


Ginv) (SBR) [LRN] 


°This value is printed if the PC-100A is used. 


a 
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REFERENCES / 
INFORMATION 


STEP AND PULSE RESPONSE 


Given h(t) =e‘, find the pulse response y(t) for T= 1.5 with n) =4 and 


T=0.5. 
0 
104 00 


Enter program. 


Enter h(t) subroutine. 


Fix decimal for desired 
accuracy. 


0.000 (We'll use 3-place 
decimal for 
convenience.) 


Enter T. 
Enter no. 


0.125 A=T/n. 

0.500 T—note that 
calculation takes 
several seconds. 


Enter 7. 


RA) 0.393 y(T). | 
1.000 2T 
RAS] 0.632 y(2T) 
1.500 3T 

RA) 0.777 y(3T) | 
2.000 4T 

0.471 y(4T) 

RAS) 2.500 5T 

0.286 y(5T) 

3.000 6T 
y(6T) 


Continue until you have generated the desired number of values. 


Grapu oF RESULTS : . 
0 


0.8 
0.6 
0.4 
0.2 


| es ae ey =e 
05 10 15 20 25 3.0 
© 25 of 47 sr '6T 


D. K. Frederick and A. B. Carlson, Linear Systems in Communication and 
Control (New York: John Wiley and Sons, Inc., 1971), chapter 4. 
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Convolution 


Given the impulse response for a linear system, you can use the convolution 
integral to find the system’s output for an input waveform. The program 
shown here generates outputs at intervals of T, using the trapezoidal rule. 


Wsyective | To calculate the output y(t) of a linear system, the convolution integral 
integrates the product of the input x(t) and the impulse response h(t) in the 
following form. 


t 
y(t) = i x(Ajh(t —A)dA 


0 
Applying the trapezoidal rule to the convolution integral yields 


Facts/ 
THEORY 


yitexa [SOM DS aka hit +200) 


k=] 


y(t) 


The number of divisions from 0 to T is n,, and A=T/n,. Note that n is 
increased for each T value (2T, 3T, etc.) to keep A constant. 


The program allows you to enter the special subroutines needed to calculate 
x(t) and h(t). 


a $$$ 
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REGISTER 
CoNnTENTS 


CONVOLUTION 


Program Keystrokes 


OFF/ON 


Purpose/Comments 


Clears calculator and enter 
learn mode. 


Stores T and m; then 
calculates and stores 
T/n, =At. 


Begins calculation of y(T), 
y(2T), ete. 


Begins loop to generate kA 
as 1A, 2A,... (n—1)A. 
Calculates and displays 
successive values ot T, and 
y(T)). 


Labels point in program 
where subroutines for x(t) 
and h(t) will be entered. 


Exits learn mode. 


Note: Print commands may be omitted if the PC-100A is not used. 


Roo counter for loops Riz ar 0 Ros Used 
Ro No Ros t Roo Used 
Ro. = T Ros kA Rio 
Rs A Ro; y Ru 


et ee ee ee ee eee ee 
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NVOLUTION 


ING THE 
ROGRAM 


SAMPLE 
*ROBLEM 


LA | 
(LRN) 
Keystrokes for x(t). 
7) 
(2nd) HN Le | 


Enter subroutine for 
x(t) and h(t). 


Be sure to end each 
subroutine with (NV) 


? 
Exit learn mode. 
Enter T. 
Enter no. 


Keystrokes for h(t) 
INV] 


ARRAS FE 


°This value is printed if the PC-100A is used. 


2 tS0.3 
0 t>03 


and h(t) = 10e>*', 
find y(t) at t=0.1, 0.2,..., using n, =4. 


Given x(t) = { 
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10 


CONVOLUTION 


Procedure 


Enter program. 


Enter subroutine for 
x(t). 


Assume t is in display. 


End with [Nv] 
and enter subroutine 


for h(t). 


z 


Be sure to end with 
return command. 


Exit learn mode. 


Be 


Fix decimal, if desired. 


Enter T. 


Enter n,. 


IRRRIARTRE GE 


Display /Comments 


122 00 


0.000 We'll use 3-place 
decimal, 


0.100 T (allow several 

seconds for 
calculation of 
each successive T 
value). 


Se ee oe See any ee een eee ae 
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C!ONVOLUTION 


The problem may be graphed as follows. 


x(t) 


h(t) 


io 


y(t) 


FREFERENCES/ DD. K. Frederick and A. B. Carlson, Linear Systems in Communication and 
Linrormation Control (New York: John Wiley and Sons, Inc., 1971), chapter 4. 


$$ 
Breereimcar ann Sverems ENGINEERING 10-43 


Discrete-Time System Response 


This program calculates output values for a discrete-time system described 
by a linear difference equation. The input may be entered manually or 
entered by a subroutine which computes the input values. Also, you may 
enter initial-condition values if you wish. 
A discrete-time system described by the difference equation 

a,y(k+n)+ *¢* +ay(k+1)+ay(k)=bpx(k+m)+ +++ +bix(k + 1) +box(k) 


with m<n and a, #0, can be modeled as: 


where q;, Gz, ..- qn are the state variables at the outputs of the successive 
delayers (D). 


Hence y(k) = = (big. 
and for the next iteration 
qi(k + 1) =q; .1(k) Pee Qeee* sn] 


Given x(k), the following program computes successive values of y(k) for a 
system up to seventh order (m<n7). Initial values for qu, qe, . . - qn May be 
entered. The input x(k) may be entered directly from the keyboard or 
computed in subroutine MBM as sample values of x(t). Note that sampling a 
signal every T seconds yields the sample values x(kT) for any k. 


Cie ie. OnE Bee 8 a ee 
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ISCRETE-TIME SysTEM RESPONSE 


Tue 
PROGRAM 


Program Keystrokes Purpose/Comments 


OFF/ON [s) Clears calculator and enters 
learn mode. 


ti | LA | [Sto] Stores values for a’s, b’s, and 


Clears memories and flag 0. 
Stores n+1 in R,. Stores 
starting memory location 
for storing a, values, Calls 
subroutine Ml to store a, 
values. Stores a, in Ry». 


Stores starting memory 
location for b, values. Calls 
subroutine HEM to store b, 

values. 


Stores n in R, for looping. 
Stores starting memory 

location for q; values. Calls 
subroutine MEW to store q 
values. 


Stores T in Roy. Sets 
kT= —T for first value. Sets 
flag 0 to indicate x(kT) to be 
used. Transfers to HG. 


—) 
~] 
_ 
Ey 
— 
a 
3 
So 
wo 


Sets k= —1 for first value. 


Stores n+1 in Ry. Stores 
starting memory locations 
for a, and b, values. 


(2nd) HOH (2nd) BEM [Rct) 4 [S70] 00 
5 [sto] 01 13 Sto] 02 


Recalls a, and divides it 
into a, @1,...:<, a, and 
Bos Diss,» a5: Ox 
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10 


DiIscRETE-TIME SYSTEM RESPONSE 


107 


Program Keystrokes 


Gnd) HE SUM 0 STO) 19 5 SO O1 
21 S10) 2 RG 4 57) 0 


Purpose/Comments 


Clears memory 12. Stores 

starting memory location of 

ay 

= and of q; values. Calls 
n 

subroutine Bl to compute 

yay 

ee Ee 


aj . 
Stores —-23-4 vi I es, IE 
flag 0 is set, go to ERM. 


If x(k) is being entered, add 
1 to k and stop for x(k) to be | 
entered. 


eel 
° 


Tt 


Recalls T and places kT +T 

in Ry. Displays kT and calls 

subroutine HG to compute | 
x(kT). 
Adds x to — THQ. 
Initializes registers and calls 
subroutine MGB to calculate 
sbi, 

Zia. 


EEE 


[Ret] 12 (2nd) FW [Rvs] 


21 [Sto] 01 22 (Sto) 2 Re) 4 [sto] 0 
(2nd) HE 30 


Displays y(k). 


Advances q’s for next 
calculation, i.e., moves q, to 
q: position, qs to qe position, 
etc. 


aj 
Computes 2q qi.1 or 
Dext die Stores sum in Rj. 
n 


BRHE ERE 


Cf 8 2 ee ee ee, ee 
10-46 ELECTRICAL AND SYSTEMS ENGINEERING 


DisCRETE-TIME SYSTEM RESPONSE 


REGISTER 
CONTENTS 


|| Usinc THE 
|| PRoGRAM 


Program Keystrokes 
224 ti | LE) Label for x(kT) subroutine. 


Purpose/Comments 


Note: Print commands may be omitted if the PC-100A is not used. 


Roo Used Ry; 
R,, Used Ros 


Ros Used Ros iad Ry 


Enter n. 


Enter a, values. 
ag 


a, 


ay 


Enter b, values. 
bo 
b, 


b, 
Enter initial q, values 
if desired. 

qh 

qe 


n 
If you are entering 
each x(k), follow this 
procedure. 


Begin calculation of 
y(0). 
Enter x(0). 


Begin calculation of 
y(1). 
Enter x(1). 


ELECTRICAL AND SYSTEMS ENGINEERING 


k or kT Ris—Rao bi Ra 5x 
n+1 Ra za R.; qi 
aj Rex Used 


HI 


: Gl 


“Bele bl 


5 


(c] 
[R/S] 


5 


1 


1 RS 
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DiscrETE-TIME SYSTEM RESPONSE 


ee 


Begin calculation of 


Enter x(2). 


Continue in this way 
until all desired values 
are generated. 


OR 


If you are using a 
subroutine to compute 
x(kT), use this 
procedure. 


Enter subroutine for 
x(kT). 


Bi 
El 


(2nd) 


mH 
© 

“< 
v 
~ 
g 
° 


a: 
A 


Enter T value. 
Calculate y(0). 
Begin calculation of 
y(1). 

Calculate y(1). 


Ae & 


I § 


Begin calculation of 
y(2). 
Calculate y(2). 


a] § 


Continue in this way 
until all desired values 
are generated. 


Display/Comments 


2.° k=2 
y(2)° 


226 00 


°This value will be printed if the PC-100A is used. 
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IDiscRETE-TIME SYSTEM RESPONSE 


| SAMPLE 
| PropLleM 


(1) For the difference equation 
By(k + 1) + L.5y(k) = —3x(k+ 1) + 6x(k) 
find y(k) when x(k)=1 for k=0, 1, 2,.... Use an initial value q, = 2. 


Enter program. 0 


. 


Enter n. 


Enter a, values. 


ay 15 
a 3 
Enter b, values. LB | 


by 6 

b, 3 
Enter initial q, values. 

qh 


Begin calculation of 
y(0). 

Enter x(0) and 
calculate y(0). 

Begin calculation of 
y(1). 

Enter x(1) and 
calculate y(1). 

Begin calculation of 
y(2). 

Enter x(2) and 
calculate y(2). 
Continue in this way 
until all values desired 
are calculated. 
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(2) Given the difference equation 
B3y(kT + T) + 1.5y(kT) = —3x(kT + T) + 6x(kT) 
find y(kT), T=0.1, when x(t) = 1 for t= 0. Use q, =2 for an initial value. 


Display/Comments 
Enter n. 1 (A) 0 
Enter a, values. 
A 1.5 1.5 
a 3 3. 
Enter b, values. 0 
by 6 6. 
b, 3 —3. 
Enter q; values. 0 
qi 2 2. 
Enter subroutine to (GTO) 
compute x(t). L-E 0. 
(LRN) 226 00 
1 GN) 228 00 
0. 
Enter T value. 1) 0. 
Calculate y(0). 4. y(0) 
Display 1T. 0.1 1T 
Calculate y(0.1). -1. y(0.1) 
Display 2T. 0.2 2T 
Calculate y(0.2). 1.5 y(0.2) 


Continue in this way 
until all values desired 
are generated. 


ReEFERENCES/ D. K. Frederick and A. B. Carlson, Linear Systems in Communication and 
InForMATION Control (New York: John Wiley and Sons, Inc., 1971), chapter 13. 
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a Physics and 
Astronomy 


Introduction 


The handheld programmable calculator, by its very existence, opens several 
new and important avenues of approach for the student of physics and/or 
astronomy. In this chapter our aim is to present a selection of programming 
examples showing the calculator as a new exploratory tool for the scientist. 
We'll focus in particular on the role of the calculator in allowing you to: 


* graph and analyze the behavior of an equation or mathematical 
model, 

* apply the simple but powerful numerical integration techniques to 
situations involving differential equations, and 

* set up a ‘numerical laboratory” where the simulation of a complete 
system can be programmed and investigated. 


By no means do the examples presented here represent a comprehensive 
collection of calculator applications in physics and astronomy. They were 
chosen simply to illustrate some of the potential of the use of the 
programmable calculator in the field of the physical sciences. We hope that 
these examples will serve as a springboard for teachers, students, and 
professionals alike. 


i 
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THEORY 


Fraunhofer Diffraction 
at a Circular Aperture 


An important diffraction situation in practice is the case of Fraunhofer 
diffraction at a circular aperture. The following program allows you to graph 
intensity vs. angle behavior for any selected values of the parameters R/A 
and N. (Here R is the aperture radius, A is the wavelength of the incident 
plane radiation, and N is the number of “‘strips” we divide the circular 
aperture into for purposes of analysis.) 


With this program it’s easy to explore the intensity behavior predicted as key 
parameters are varied. Note that performing the calculations involved, even 
with the aid of a standard “‘slide-rule” calculator, can be quite tedious and 
time consuming. The programmable calculator enables you to store an entire 
“mathematical model” in the machine so that you can focus your attention 
more directly on the nature of the predicted results, rather than on the 
computations involved in getting at them. 


The usual treatment of this problem in elementary physics courses and 
textbooks is first to study Fraunhofer diffraction at a long slit, since this 
problem is easier to tackle, and then to illustrate and state the result for a 
circular aperture. With the programmable calculator it’s easy to make an 
accurate graph of the circular aperture diffraction pattern using a 
straightforward procedure completely analogous to the derivation of the 
single slit results. We'll make all the usual assumptions for Fraunhofer 
diffraction found in most elementary treatments. 


As shown in Figure 1, we'll assume plane waves of wavelength A 

g 
perpendicularly incident on a circular aperture of radius R in an opaque 
screen. 


| (3) TO VIEWING SCREEN 


3rd STRIP 


INCIDENT WAVE FRONTS 


>-ol fe 


Figure 1. 
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aiT A CIRCULAR APERTURE 


We'll assume that everywhere in the aperture the scalar wave field is 
unaffected by the presence of the screen and that the pattern is viewed on an 
infinitely distant screen. 


Ata given angle © from the axis of symmetry, the wave amplitude on the 
viewing screen is calculated as follows. Half of the aperture is divided into N 
strips of equal width R/N, where N should be greater than 10 for reasonable 
accuracy. (See Figure 1.) The contribution E; to the total wave amplitude E 
on the viewing screen, due to the i-th strip in the aperture, is approximated 
by 

E, =KA,cos[ (i— 4) ¢] ISiSN. 


In this formula K is a constant, A, is the area of the i-th strip, and (i— 14) ¢ is 
the phase shift of the ray from the midpoint of the i-th strip, relative to the 
ray from the center of the aperture. ¢ is the phase difference between rays 
from the midpoints of neighboring strips and is given by 


—PD2lAnc=1 ag le i ae iy 
A, = R*Icos 1 (N N ] (y) 
i-l,, i-] =l, 
nae VII 
ISiSN. 


The total amplitude E(@)on the screen is then calculated from 
N 
E(9)= 2KZA, cos (i —\) $] 


where the factor of 2 accounts for the effect of the other half of the aperture. 
If we choose units such that K =(7R?)‘"’, then E(0) has the value unity. Our 
program is arranged to compute and display E(9)*, which is proportional to 
the actual pattern intensity observable on the viewing screen, 1(8). 
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THE 
PROGRAM 


REGISTER 
CONTENTS 


FRAUNHOFER DIFFRACTION 
AT A CIRCULAR APERTURE 


Program Keystrokes Purpose /Comments 


OFF/ON [RN Clears calculator and enters 
learn mode. 


Enters © and computes Q. 


el 


a 
. 
Ey 
i] 


Computes A,cos[ (i — 4) 9]. 


1S & 13 Accumulates 

2 E) @) ka 13 [iny) Lana N 
SmMvomMo | 2ZArcosli-)9] 
Co) 8 Ra] 1 DJ in memory 11. 
Ei (=) se 11 7 0 ‘ 

Lk | 


Computes I(0) = E(O/’. 


Stores 9,, 8,;, and AO. Then 
calculates consecutive 


values of I(O) in steps of AO. 


Stores R/A, N, and 
27R/(NA). 


Roo Used Roe N Ry. 1/N : 
Ry. i-k Ry;  2R/(AN) Rs y1-(4) 
Ro i/N Ro ¢ Ry 9, 
Ros Used Ros Ai ] Ri, 0, 
Roy Ry Ay Rye AO 
Re 6, Ry 2 Ex Ri; 
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FRAUNHOFER DIFFRACTION 


AT A CIRCULAR APERTURE 


Usinc THE 
ProcraM 


Clear memories and 
set decimal for desired 
accuracy. 

Enter value of 
parameter R/A. 

Enter N. 


To calculate I(®) for a 
given single value, 
enter 9 in radians. 


To calculate 
consecutive values of 
1(O) in steps of AO: 
Enter 9,. 

Enter 0,. 

Enter AO and begin 
calculation. 


Continue to press 
until all values of 1(0,) 
from 0, to 0; have 
been calculated. 


°This value is printed if the PC-100A is used. 


R/A 


27R/(AN) 


1(8)° Allow about 50 
seconds for 
calculation. 


OFF 
1(8)° Calculation of 
1(0) will take 
several seconds 
each time. 
6r 
I(0,)° 
Or 
1(8,)° 


EI, SI a ——————— 
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AT A CIRCULAR APERTURE 


Given that: 
R/A=10 N=15 
8 =0 to 0.12 radians 
A® =.005 radians 


find 1(0,) for all values of 9. 


Enter program. 0 
0.00000 


Set decimal to 5 
places. 


Enter R/A. 
Enter N. 
Enter 0,. 
Enter 0,. 
Enter AO. 


10.00000 
4.18879 27R/(NA) 
0.00000 
0.12000 


0.00000 ©, 
1.00000 1(8,) 
0.00500 0, 
0.97555 


0.12000 


Continue until all 
values of I(,) from 8, 
to 9, have been 

generated. 


0.00139 


0.15427 


0.08500 | 0.01670 


0.08023 0.09000 | 0.01351 
0.03285 0.09500 | 0.00899 
0.00818 0.10000 | 0.00463 
0.00019 0.10500 | 0.00151 
0.00223 0.11000 | 0.00010 
0.00835 0.11500 | 0.00025 
0.01415 0.12000 | 0.00139 


0.01715 
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HRAUNHOFER DIFFRACTION 
MT A CIRCULAR APERTURE 


FURTHER 
XPLORATION 


IREFERENCES / 
IINFORMATION 


Fraunhofer Diffraction 
at a Circular Aperture 


R/A= 10 
N=15 


Relative Intensity 
vs Angle 


1/1, 


un 


0 05 ; 10 15 


8 (radians) 
Figure 2. 


1. If the parameter R/A is changed, how does the ratio I,/I, change? I, is the 
peak intensity of the first circular fringe surrounding the central bright 
spot in the diffraction pattern. 


2. Using a method analogous to the one given here, write a program and 
calculate the diffraction pattern of a rectangular aperture. 


See treatments of Fraunhofer diffraction in: 


J. M. Stone, Radiation and Optics: An Introduction to the Classical Theory 
(New York: McGraw-Hill Book Company, Inc., 1963). 


EE 
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Euler’s Method and 
Studies of Motion 


There are times in basic physical studies where the exploration of a 
particular phenomenon or physical situation reaches the point of a major 
“cop-out.” At such times the instructor is usually forced into jumping right to 
the result or using an “approximation.” Such “‘cop-outs”” often occur in 
explorations that lead up to a differential equation since the realities of the 
system may make the differential equation difficult — or even impossible — 
to solve. 


Numerical methods for solving differential equations have been around for 
quite some time. However, because of the large amount of iterative 
arithmetic involved, instructors and students seldom consider their 
application unless a computer is readily accessible. Here’s where the 
programmable calculator can be extremely useful. You can use the 
programmable calculator with the program given here to implement 
numerical methods. Thus, even with complex dynamic situations you can 
obtain amazingly accurate results quickly and easily. In this problem we'll 
explore the use of the “modified” or “improved” Euler Method in several 
situations in basic dynamics. 


In using the Modified Euler's Method to analyze the motion of physical 
systems, we divide time into small intervals, each of length At. If At is made 
small enough and we assume the velocity is constant over the interval, we 
can get a good approximation. For this method we assume the velocity is 
constant over the interval and is equal to its value at the midpoint of the 
interval as shown in Figure 1. 


V1 25% Vo + ao(At/2) 


X, ==x, +v,,-At 


F,=F(v, 2, X;, At) 


Figure 1. Improved Euler Method 
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EULER'S METHOD AND 
Srupies OF MOTION 


We begin computation with the following initial conditions: 


t = 0 

x = ik 

Vv = “V5 

F = F, = F(¥0,X0,0) 
ay = F,/m 


Using these values, we compute the velocity value at the midpoint of the first 
interval as 


At 
Visz=Vo a Fs a>) 


Then the position at time At is given by 
X, = Xp +v,,.At 


Note that we assumed the velocity of the particle throughout the interval is 
constant and equal to the velocity value at time At/2. 


Using this same procedure for every interval gives us the following general 
equations for n=1, 2,... 


F, = F(v,-o.5.Xn,nAt) 
Be 

i in 

Vn +0.5 Vn-0.5 + anAt 


Xn+12=Xn +Vn-o.sAt 


a 


The following program allows you to apply the Modified Euler’s Method to a 
wide variety of dynamic situations. To use the program you must enter the 
force law as subroutine MGM before the program is run. 
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EuLer’s METHOD AND 
StupIEs OF MOTION 


Program Keystrokes Purpose/Comments 


OFF/ON [RN Clears calculator and enters 
learn mode. 


Stores At. 


Stores Xo. 


og | GAM I sw 2 
a mm (7 0 
/S 


i) 4 Stores F, 


(ind) MON (2nd) ME RCL) 0 SO) 5 
(GR) 51) 6 STO) 07 


Computes v,,. and x,. | 
Initializes registers for 
calculations. 


At 


At, | 
2? | 


Computes V,/2 = Vo + aol 
where a =F,/m. 


Computes x, =X» +V,,At. 


5 (2nd) 
RCL] 6 Ee 7s) 
7 (2nd) EW nc) WE [R7s) Displays vn -o.5- 


iG =) ke 3 ES) Computes v,..o.5 = a,At+ 
(Rc) 0) Re) 7 (=) 07 Vn-o., Where a, =F,/m. 


0 (=) SM 06 Computes x, .1 = 
Vn +0.5 At+xn. 


Displays nAt. 


Displays x,. 


Computes nAt. Transfers to | 
HEB to display new values. 


Label for subroutine that 
computes the force, F,, 


Exits learn mode. 


Note: Print commands may be omitted if the PC-100A is not used. 
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‘REGISTER 
(ConTENTS 


Wstnc THE 
ProcraM 


Roo At 
Ro: Xo 
Ros Vo 
Ros m 
Ro, F, 


Ros nAt 
Ros Xp 

Roz Vn -0.5 
Ros 

Ros 


Enter subroutine to 
compute force. Be sure 
to put {INV] as 

the last step. 


Enter At. 
Enter Xo. 
Enter vp. 
Enter m. 
Enter F,. 


Begin calculations. 


Continue to press 


until you have 
calculated the desired 
number of values. 


(Gt0] [2n¢) SG 


Enter keystrokes 
for force 


computation 
[INV] [SBR 


‘SEGRE ARH AG 


°This value is printed if the PC-1O0A is used. 
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Consider a point mass, m, leaving a plane with zero initial downward 
velocity, as shown in Figure 2. The body is pulled downward by gravity and 
slowed in its fall by an upward viscous force proportional to its speed 
squared. The force acting on the body is given by 


F=mg—kv" 
where k is the constant that describes the damping force, and the body’s motion 
is determined by the differential equation 


mg if x 
Figure 2. 


We can use Euler’s Method to explore the motion of the body in its downward 
fall. To use the program we simply need to program the force equation in 
subroutine MG. Then it is possible to “watch” the speed and fall distance of 
the body as time progresses. Use the program to watch the motion of a 
skydiver when the damping constant k equals 0.005 Ns*m-*. Use At = Is and 
m= 1kg. Note that x, =v, =0 and F, =9.8N. 


Procedure 


Display/Comments 


Enter program. 


Enter subroutine for (GTo) ic | 0. 
computing force. Note | [RN] 107 00 
that R, is used for 7 
storing the value of k. 8 

=) 

3 

9.8 E) 

INV 124 00 
Enter At. 1) 
Enter x. 
Enter Vo. 


Enter m. 
Enter F,. 
Store value of k. 


.005 08 
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jTUDIES OF MOTION 


Procedure 


Set decimal place for 
desired accuracy. 0.005 


Begin calculations. 1.000 At 


4.900 x, 
4.900 v2 
2.000 2At 
19.480 x, 
14.580 v3/. 


Continue to press R/S) until all desired values are computed. 


The following values were obtained for n=1,..., 20. 

1.000 6.000 11.000 16.000 
4.900 147.823 362.538 583.526 
4.900 39.049 43.961 44,255 
2.000 7.000 12.000 17.000 
19.480 189.048 406.636 627.788 
14.580 41,225 44.098 44,263 
3.000 8.000 13.000 18.000 
42.797 231.576 450.811 672.055 
23.317 42.527 44.175 44,267 
4.000 9.000 14.000 19.000 
73.196 274.860 495.029 716.324 
30.399 43.285 44.218 44.269 
5.000 10.000 15.000 20.000 
108.774 318.577 539.271 760.594 
35.578 43.717 44.242 44.270 


The graphs in Figures 3 and 4 illustrate the basic physics of the system. In 
free fall (k =0) the only force acting on the body is the constant force due to 
gravity. Thus the distance curve is parabolic in shape, and the velocity is 
directly proportional to time. However, if the damping force is considered, 
the net force is decreased as time goes on by the damping force. At the point 
where kv? equals mg, the particle reaches a terminal velocity, v,, and the 
distance assumes a linear time behavior. We can solve for the terminal 
velocity by setting force equal to zero. 

F=mg-—kv 

0=mg—kv 
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9.8 


In our case v, = 


= = 44.272 m/sec, which agrees with our results. 
0.005 


20004 x(meters) 


(k =0.005) 


12 13 14 15 16 17 18 19 20 tsa 
Figure 3. Distance Plot for Sample Problem 


v(m/sec) 


3.4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 tise 
Figure 4. Velocity Plot for Sample Problem 
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1. Using the program, plot a family of curves for a skydiver using damping 
constants k = 1.0, 0.5, 0.25, 0.05, 0.01, and 0.005 Ns?m?. . 


What conclusions can you draw from these graphs about the relationship 
between v, and k? Could you estimate k for a steel sphere falling through 


FURTHER a 
IXPLORATION water or motor oil? 


2. Use the Euler’s Method program to plot the same family of curves for an 
object falling through a medium with a linear damping force (— kv); and 
one with a cubic damping force (— kv’). Compare the shapes of these 
curves to those curves for the v* force. 


3. Use the Euler's Method program to analyze the motion of a pendulum 
where 


F=—mgsinO 


mg sin@ mg mg cos 8 


Note that the exact solution to this problem is rarely explored in basic 
courses. Usually, the assumption is made that © will remain very small, so 
that sin @=Ois a valid approximation. This yields the approximate 
solution 


O=6,,,,C0S (wt + 6) 


where | 
Qo= s 


Compare this solution to the one generated by the Euler Program. For 
what values of @ is the difference significant? Note: Be sure to use radian 
mode for this application. 


—i09 


RiererENcES/ Robert M. Eisberg, Applied Mathematical Physics with Pocket Programmable 
byrorMaTIoN Calculators (New York: McGraw-Hill Book Company, 1976), pp. 45-63. 
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Facts/ 
THEORY 


Central Force Motion 


In this problem we'll be studying the dynamics of central force motion, 
where we use the calculator to simulate the orbit for a variety of 

initial conditions. For this example we'll use a more sophisticated numerical 
method than the Euler approach used in the previous example, called 
Cowell’s method. The force law is entered as a separate subroutine in the 
program, which allows study of motional results for various force laws 

and constants of the motion. 


We wish to solve for r (t), where F satisfies 


Cite Mask ps 
am © 


and the force F is central, i.e., parallel to the position vector f. In the orbital 
plane we can write the following two equations: 


with the initial conditions, at time t=t. 


X(to) =Xo 
y(to) =Yo 


dx ; 
(Vx)o -()- X(to) = Xo 


To solve this problem numerically, we'll use Cowell’s method, which is a 
fourth-order predictor-corrector method for solving differential equations of 
this type. We will discuss the treatment of the x variable here, but keep 

in mind that the program will also include a similar treatment for the y 
dimension. 


To use this method we divide the study of motion into small steps of time, 


each of fixed duration h. So 
h=t..-th=ti— 


th-1 


It is also assumed that we know two consecutive values of the variable, say 
Xn-1 and x,. 
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Following Cowell’s method, we obtain a first estimate for Xn+1 using the 
formula 


Xi 2x, ~Xn-1 +h’f., 
where f, n= f,(Xn,Yn) 


/ 


This preliminary estimate for x,., is then corrected (only one time in this 
program) by applying the “corrector” 


Xne1 = 2X, —-X,_i th fn +E han = fia Ffin-1) 


where fin. =£(%qo1, Yao) 


In some applications of Cowell’s method, this corrector would be applied 
iteratively until the change in the result reached a specified tolerance. In 
most cases, however, one application of the corrector is sufficient. 


Unfortunately, this predictor-corrector method is not self-starting. We use a 
method for starting given by Dahlquist and Bjork which is equivalent to 
solving the non-linear equations 
X, =Xo +h x +h°(3f,, + 10f,.6— fh, -1)/24 
X_1 =X) —h x +h(3f,_.+ 10f,.o— fi,1)/24 
In the program this system of equations is solved by direct iterations from 
the starting values 
X, =X) +h x +%h*f,, 
= Xo —h & + 4h", 


Once x, and x_, are determined, the recursive step-by-step integration of the 
equation of motion can begin. 


Step # | Program Keystrokes | Program | Program Keystrokes | Purpose/Comments 


OFF/ON (oer ee gees = Clears calculator and enters 
learn mode. 
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| Step # Program Keystrokes Purpose/Comments 


Stores h. 
Stores to. 
Stores Xo. 
Stores yo. 
Stores hx». 
Stores hy, 


Clears t-register. Calls 
subroutine CE] to compute 
f,.9 and £,.o. 


Stores t; =t) +h in R,, and 
t_,=t)—h in R,. Stores h? in 
R;. Computes 

X; =X_ thx, + “’h"f,.o 
X_; =X) — hx, + “4h*f,, 
Y¥1 =Yo thy + ’h* feo 
¥-1 = Yo hyo te Yoh" foo 


113 10 02 Loop index. 
12 (inv) El 06 Stores h?/24 in Ry. 
[tor | Subroutine to find starting 
(2nd) values. 
(sto) 22 Computes f,,-, and f,,_, and 
a stores them in Rye, Res. 


Computes f,,, and f,.,. 


Computes: 

(3f..1 7 10f,.0 - f,, -1) 
(3f,, i te 10f,.0 ay f,.1) 
(3f.,1 7 10f2,0 —f,_1) 
(3f., vt 10f2.0 - fo.1) 


Oe Se ee ae ee ee eee ee 
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Step # | Program Keystrokes Purpose/Comments 


Multiplies equations above 
by h?/24 and adds or 

subtracts hx, and hyo as 
necessary. 


Completes calculation of 
new x,. Stores change in x, 


in R,,, then stores new x, in 
Ris: 


Completes calculation of 
new y, and stores it in R,3. 
Computes the sum of the 
change in x, and y,. 


If the sum of the changes in 
x, and y, equals zero, 
transfers out of loop. 


Loop set for maximum of 
ten iterations. 


Computes f,,, and f,,,. Stores 
h?/12 in R,. Transfers to 
(2) to display results. 


Subroutine to do integration 
step. Computes t,.,=t, +h. 
Xn * Xn-15 Xn+1 * Xn 
Yn * Yn-15 Yn+1 *Yn 


fin = fi,n-13 fines ? fin 


fo.n = fon-13 frags * Ton 


2 Computes x,,; and yn,1. 

5 Calls subroutine [EJ to 
compute f,,,.: and fo.ns1. 
CE) 
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Purpose/Comments 


ais a Keystrokes 


329 


Applies corrector. 
Computes x,.; and y,,1. 
Calls subroutine CE] to 
compute f,,,,, and fo.n.1 
with corrected values. 


Displays tn+1, Xn+1» ANd Yass. | 


Label for force law 
subroutine. 


Roo Ros t—h Rus fF us 
Ro, Ryo h Ras foin 1 
Ros Loop index Ry ta Reo fn 
Ros Ry» Xnea R 1 fo.n 
Ros Ry; Ynei Ro» fer, 
Ros h? Ri, Xn Ros fn =i 
Rog h?/24; h?/12 Ris Yn Roy 

Ro; hx, Ris Xn-1 Ros 

Ros hyo R,; Yn-1 Ras 


Enter keystrokes for 
function subroutine. 
Use registers 11, 12, 
and 13 for t, x, and y. 
Store f, and f, in 


keystrokes for 
f, and f, 


(INV) [SBR] 


registers 18 and 19. Be 0 
sure and end with 

(INV) 

Enter step size, h. h 
Enter ty. 

Enter x. Xo 


Enter yo. 
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PROBLEM 


Enter Xp. 
Enter yo. 


a & 


Calculate starting 
values x_1, %1, Y-1, Yi- 


Display new x, 


Display new y,. 

Take integration step. 
Display x. 

Display yo. 

To obtain more points, 
repeat procedure for 
integration step as 
many times as 
necessary. 


AAAS FB 


Calculate the orbits for the 1/r? force law. The equations to be solved are 


Ce ii ee (1) 


f, = dt? (?+y?? 
f= gy 2 = [2] 


Note that time is the independent variable. Plot two orbits using the 
following initial velocities 


inner orbit Xo = 
Youl 

outer orbit X» =0 
Yo= 1.15 


Use a step size of 7/20 for both orbits and begin both trajectories at x= 1, 
y=0. 


ee eee ee ee 
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Enter program. 0 
Enter keystrokes for f, CE] 379 00 
and f,. CC) Rel] 12 (22) 

13 (=) 

04 15 E) 

[sto] 4 

Gd Re 

18 13 

GA 4 

i) 19 

(INV) 413 00 

(LRN) 0 
Fix decimal for desired 
accuracy. ‘ 0.000 
Enter step size, h. 

0.157 

Enter to. 0.000 
Enter Xp. 1.000 
Enter yo. 0.000 
Enter X. 0.000 
Enter Yo. 1.000 
Calculate starting 
values. 0.157 t, This 
Display x,. 0.988 x, calculation 
Display y,. 0.156 y, takes about 
Take integration step. | CEJ 0.314 t, 95 seconds 
Display x2. 0.951 x, 
Display yo. R/S) 0.309 y2 
Take integration step. | [CJ 0.471 t, 
Display x;. RS) 0.891 x; 
Display ys. 0.454 ys 
Continue until you 5 © 
have the entire orbit. : . 
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6.126 try 
0.988 x55 
—0.156 ys, 
6.283 ty 
1.000 x,, 
0.000 y4o 


Take integration step. 
Display Xz5. 
Display yao. 
Take integration step. 


Display X,o. 


a el & 8 el 


Display yo. 

For the outer orbit, 
clear the memories 
and begin by entering 
the step size and initial 
values for the outer 
orbit. 


a initial point 


x 
x 


Figure 1. Inverse square force. 


a —————T 
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FurRTHER 
EXPLORATIONS 


REFERENCES / 
INFORMATION 


CENTRAL ForcE MOTION 


1, What is the period of each of the orbits shown in Figure 1? 
[Answers: Outer = 11.267, Inner = 6.2832 (in nondimensional time units). ] 


2. Let a planet be in orbit about the sun. Show how to reduce the problem to 
the non-dimensional form used in equations [1] and [2] of the Sample 
Problem. In terms of the parameters of the problem, what are the values of 


one unit of time? distance? speed? 
Cowell’s Method is described in 


G. Dahlquist and A. Bjork, Numerical Methods (Englewood Cliffs, N.J.: 
Prentice-Hall, Inc., 1974), pp. 352-357. 
For an intermediate treatment of central force motion see, for example, 


K. R. Symon, Mechanics, 2nd ed. (Reading, Mass.: Addison-Wesley 
Publishing Company, Inc., 1960). 
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[wo-Dimensional Speed Distribution 


OBJECTIVE 


Facts/ 
THEORY 


In this project the calculator is used to numerically simulate the motion of 
two hard spheres bouncing within a square, two-dimensional box. This 
numerical experiment can be used to learn about distribution functions, to 
learn about the dynamics of ideal hard sphere collisions, and to get a feeling 
for the number of collisions which are required to establish a “good” speed 
distribution function in a gas. You can use the program given here to explore 
the dependence of the distribution function on the diameter of the spheres. 


We consider our “gas” to be two hard pucks each of radius a and confined in a 
square box of side length 1 + a as shown in Figure 1. The pucks shall be 
labelled “1” and “2” and have velocities. 


Vi =Maltvis} 
Va = Vo.x1 + Voy] file 


Each puck’s trajectory is described by two equations 


X(t) =Xjo FV, xt i=l, Qa . 
Yi(t)=yiotviyt [2 


where t is the time. 


If the pucks are launched with arbitrary initial velocities at arbitrary 
positions, than after a short time one of the following events will happen. 
Hither one or both pucks will collide with the walls of the box, or the pucks 
will collide with each other. Any of these collisions is assumed to be elastic. In 
the case of a collision with the wall, the speed of the puck is not changed. 
However, in a puck-puck collision the individual speeds of the pucks are 
changed, as well as the velocity components. We determine which of these 
events next occurs in the box by calculating the time at which each event 
would happen and then selecting the earliest one. 


Figure 1. Two-Dimensional “Gas” of Two Frictionless Pucks. 
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The time t,,; of a collision with a wall which is perpendicular to the x axis 
(which will be called an x-wall) is given by 


eat Oat 
TLL, vio) (3) 


and similarly the time t,,; for a collision with a y-wall is 


: = Wy 0, Vi.y<O] Dine 
ei Vis i Viv > O$ Yio 


[4] 


The time t, for a puck-puck collision is found from the condition that the 
distance between the centers of the two pucks be exactly equal to the puck 
diameter, or 


(Y2—yi)° + (Xe — %1)? = 4a? 5] 
Substituting from equations [2] we arrive at a quadratic equation 
Ati+Bt.+C=0 6 
where A=(Vo.y—Va.y)? + (Vax — Vien)” 
a afi — Yio) (V2.y — Vi.y) + (X20 — X10) (Va.x — Vix) | 
C= (Yoo — Yio)” + (X20 — X10)” — 4a” m 
The solutions are 


These solutions for the collision time may be real or complex depending on 
the algebraic sign of the expression (B*— 4AC). If the calculated values of t. 
are complex, then in the program it is assumed that some other event will 
occur next. If there are real solutions, we will always want the smallest one 
since this is the one which occurs when the pucks first touch. The larger real 
solution is unrealizable as a future event, though it describes a collision in the 
past. 


2 
(a) 
é 
2a 
Vinay 
6 
x Xp X, 
(®) Figure 2. (c) 
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In the event of a puck-puck collision the new velocities are determined by 
momentum and energy conservation principles: 


VYtVeaywty 


Vy? +22 = vie +3? [9] 


where the prime superscript denotes a post-collision quantity. In the case of 
smooth, hard spheres the solution is given by 


Ww=V. 4 (Vee 


H=¥, —(Veejé [10] 
where V is the initial (pre-collision) relative velocity, 
V=¥,-¥, [11] 


and é is a unit vector along the line of centers. (See Figure 2a.) @ is inclined at 
an angle @ from the x axis and this angle is specified by (see Figures 2b and 
2c) 


X, — Xp 
cos 6= Da 
2 aim Ye 
sin =" 93 (12) 


Since é is a unit vector, V°é is given by 
V-é =(V1,x—Vo,x) COS O+(V;,y —Vo.y) sin 8 [13] 
and the new puck velocities are 

Vix = Vox +(W*6) cos 8 

Vi.y = Voy + (Ved) sin 8 

Vix =Vi.x—(VW*0) cos 8 

Viy =Viy — (We8) sin 8 [14] 
In the event of a wall collision the component of velocity perpendicular to 


the wall is reversed. If puck i collides with an x-wall, then the new velocities 
are 


Vix = Vix 

Viy=Viy [15] 
and if the collision is with a y-wall the new velocities are 

Vix SV i5x 

Viy=—Viy [16] 
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Equations [14], [15], and [16] give the new velocities after any of the possible 
events. We must also calculate the new constants for the trajectories. After 
any collision the new trajectory is specified by 
XL FVixt FXio 
Yi=EViyt +yio {17} 
Since x; =x/ and y, =y/ at the instant of collision t,, the new constants are 
Xfy =Xio +(Vi.x — Vi.x)to 


Yio= Yio t (Viiy —Vi.y)to (18] 


Continuing from collision to collision, we now have a complete, deterministic 
description of the motions of the two pucks. After every puck-puck collision 
we update the cumulative speed distribution by adding the length of time 
during which each puck has had its speed to the accumulant in the 
appropriate speed interval bin. In this way we numerically tabulate the 
time-averaged speed distribution for the two pucks. 


For the idealized case of two-point pucks (a=0) the theoretical speed 
distribution function f(u) in two dimensions is 
f(u) du= Audu OSuStmax 


f(u) du=0 gC [19] 


where u is the speed, A is a normalization constant, and U,,4x is the maximum 
allowable speed, given by 

Unax = Ujo + Up [20] 
where uj, and uz» are the initial speeds of the two pucks. The speed 
distribution function given by equation [19] is based on the assumption that 
all points in the allowable phase space have equal probabilities of occurrence. 
This assumption will not be satisfied if special, rational initial conditions are 
selected. For example, one such possibility has both pucks symmetrically 
bouncing along a common straight line between puck-puck and wall 


collisions. Initial conditions leading to such periodic solutions should be 
avoided. 


| Step # | Program Keystrokes Purpose/Comments 


OFF/ON 4 Lad] 17 [LRN] 


Clears calculator, 
repartitions the memory, and 
enters learn mode. 


(eto) 272 Resumes execution after 
(RST) 


es en Re a ee ee ee ee eee ees es 
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(RCt] 19 [STO] [2nd] HH § (RC) Subroutine to calculate wall 
(2nd) MEM 6 [=:t] © [2nd] EE 029 collision time. If v=0, sets 
t=0o, Otherwise 


eee 
l1l,v>0) 


@Wo 


Subroutine to calculate |¥,| 


and|v.| 


2 2 |'2 
Vi a [vie +Viy 


Hee 


an 
4 
2) 


Initializes routine. Sets flags 
to indicate all times need to 
be calculated. Calls 
subroutine 030 to compute 
v, and v>. Sets Av for ten bir 
counting. Stores 10° as 
constant for “infinity.” Sets 
t=0. 


_ 


AB 


bt | 14 06 10 07 | Begins routine for each 

23 08 collision. Sets addresses for 
subroutine 003. 

[INV) Mao 112 003 Calculates t,, (S88) 003) if 
needed. 


26 ME 27 Increments addresses. 
28 


1 126 003 Calculates t,, (88) 003) if 
needed. 

26 WE 27 Increments addresses. 

28 

2 140 003 Calculates t,, (28) 003) if 
needed. 


26 EE 27 Increments addresses. 
28 


MA 3 154 003 Calculates ty. ($8) 003) if 
needed. 


2 ae 
BGG 
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Purpose/Comments 


| Step # | Program Keystrokes 


19 [sto] 27 (2nd) MA 8 271 


Begins calculation of t,. If 
last event was a collision 
(flag 8 set), goes to 271. 


Eel 15le) 14D) Calculates A. (equation [7]) 
28 (27) Co 1b a He 

Ro] 16 DJ 29 =?) ) SO) 03 

CO 13 EF) k@ 1220) Calculates C. (equation [7]}) 
29 [22] a ll 

ea 10 0) EM 28 (2?) 

= 22 [=] =) 05 

28 29 =) 2 Calculates B. (equation [7]) 
(=) So) 04 


If B’—4AC <0, t, =00(no 
real roots). 


Calculates t,. 
If t.<time of 

last event, sets t. =o, (See 
step 154.) Otherwise stores 
t. in Ro;. 


Unsets all flags, then returns 
to next step. 


Finds the earliest event by 
setting a flag each time one 
event has an earlier time. 


(zt) 


14 [So] 6 Re) 15 [S10] 7 
16 (Sto) 8 Re) 17 [S10] 28 [zt] 


Saves current values for 
velocities and time. 
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| Step # | Program Keystrokes Purpose/Comments 


326 1 GA 8s 408 7 | Places —1 in display. 
392 GA 6 376 Checks flags to find the 
earliest event and goes to 
appropriate section. 


Puck | hits x-wall. 
Multiplies v,,, by —1. 
Calculates x,,. Transfers to 
to start new 
calculation. 


Puck 2 hits x-wall. 
Multiplies v2, by — 1. 
Calculates x.,. Transfers to 
to start new 
calculation. 


Puck 1 hits y-wall. 
Multiplies v,, by —1. 
Calculates y,>. Transfers to 
to start new calculation. 


Puck 2 hits y-wall. 
Multiplies v., by —1. 
Calculates y%. Transfers to 
to begin new 
calculation. 


[RCL] Pucks collide. Calculates 
Vix — V2x- Calculates cos 8 
(=) and stores it in R,. Then 
computes |sin 6| and 

05 stores it in R,. 


Calculates v,, — voy. 
Computes 

(Viy — Vay )te + (y: — 2). 
Computes signum function 
(Master Library,p. V — 28) 
and multiplies by |sin 4] to 
give sin 8 the proper sign. 


BARB 
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Program Keystrokes 


Purpose/Comments 
1 4 29 
(=) (Sto) 03 


Co a) 4 (=) © 15 
Ginv] SUM 14 


Ra] 3 Xx) Ra) 5 (=) &™ 17 
finv) SUM 16 


(ed) GE 0 Gad) BEA 1 Gnd) GI 2 
BM 3 


EJ ek) 14 ©) CK) RY 27 


Computes V « é: 


Computes v.x, Vix. 


Computes v.%, vi4. 


Sets flag to indicate all time 
must be recalculated. 


Computes x, and x,.$. 


Computes y, and yy. 


(of BY a) 


Stores address of v,. Calls 
subroutine 577 to update 
distribution with v,. Stores 
address of v,. Calls 
subroutine 577 to update 
distribution with v.. 
Calculates new v, and vp. 
Stores the time. Transfers 
to if new calculation 
necessary. Otherwise stops. 


aes 


Starts with lowest speed bin. 
Sets loop counter. Recalls 
velocity value to be added 
to the distribution. 


Vpin = Vbin + Av (top of bin). 
Exits loop if vSvpin. Tries 
next bin. 


Register for this bin. Adds 
time elapsed since last 
collision to this bin. 
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REGISTER 
CONTENTS 


UsInc THE 
PRoGRAM 


Program Keystrokes Purpose/Comments 


(2nd) MO CC) 30 [S10] 00 


(Ret] [2n4) MEM 0 (2nd) MM (R75) 


(2nd) MEM 20 [610] 623 


Subroutine to recall and 
display the values for the 
speed distribution stored in 
Rao — Roo. 


ae Exits learn mode. 


Note: Print command may be omitted if PC-100A is not used. 


Roo Loop index R,, 
Ro. t.,Vi + V2,Viy — Voy Ry; 
Res Ay Ris 
Ros A, Wee R,; 
Rox B, x, cos 8 Rys 
Ros C,\/B*-4AC, sin6 = Rus 
Ros Used Rao 
Roz Used Ra, 
Ros Used Re» 
Roo N Res 
Ryo Xi Rox 
R,, X20 Ri; 
Ri Yio Rog 
Ris Y20 Re; 


Repartition the 
calculator memory. 
Enter program 
carefully. Be sure to 
check that you entered 


all keystrokes 
correctly. 


Fix decimal to desired 
accuracy. 

Enter the number of 
collisions, N. 


PHysics AND ASTRONOMY 


Ros Used 

Reg Used 

Rio Rys Storage bins for 
speed distribution 
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Store initial data. 


[Sto] X20 
(S10) Yio 
Yo 
Vix 
[Sto] Vox 
vas 
Voy 
Store puck diameter, 2a. 2 2a 
Begin program t elapsed time 
execution. 
Display speed 
distribution values. 
Bin l. t,,° time units in bin 1. 
Bin 2. t.,° time units in bin 2. 
Bin 3. t;,° time units in bin 3. 
Bin 4. t,,° time units in bin 4. 
Bin 5. t;,° time units in bin 5. 
Bin 6. t,° time units in bin 6. 
Bin 7. t;,° time units in bin 7. 
Bin 8. ts,” time units in bin 8. 
Bin 9. t,,° time units in bin 9. 
Bin 10. tioy° time units in bin 10. 
If additional 
calculations are 
desired for more 
collisions, continue 
with the following. Be 
sure you do not alter 
any flags or memories. 
Enter number of 
additional collisions, N. N. 
Begin calculations. t total time elapsed. 


Display speed 
distribution values if 
desired. (See above.) 


°This value is printed if the PC-100A is used. 


fa Sr ee 
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To test your entered program, run the following set of initial conditions: 


Number of collisions =5 
Puck diameter, 2a=.3 


X19 = 0.011 Vix = 1.013 
X29 = 0.902 Vox = — 1.21] 
Yio = 0.501 Viy = 1.103 
Y2o = 0.302 Voy = — 0,225 


Procedure 


Enter program. 


Fix decimal for 3 
places. 3 
Enter number of 
collisions. 5 09 
Enter initial data. 
X10 O11 10 
X20 .902 ll 
Yio 001 12 
Y20 .302 13 
1.013 14 
1.211 15 
1.103 16 
225 17 


Enter puck diameter. | .3 22 


Begin program elapsed time 

execution. This calculation 
takes about ten _ 
minutes. 


ty 
toy 
tay 
ty 
tsy 
tex 
try 
tsy 


Recall speed 
distribution values. 


ARS SRRRM 


2] [2 
Be 
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1. Suppose the program calculates N collisions in time interval t. What is the 
value of the constant A in Equation 14? (Don’t forget that there are two 
pucks.) 


2. If one puck has a diameter 2a=.3 and the other puck has a diameter 


SS Oewhats 1 2a whic ontered i am? 
rein shiaiee 2a=.2, what is the value of 2a which should be entered into the program: 
(Answer: ¥4(.2 + .3)=.25). 


3. Have the calculator tabulate distribution functions for runs with several 
numbers of collisions, e.g., 50, 100, 200, . . . - After each run find the rms 
deviation of the tabulated distribution from the theoretical one. Plot this 
rms deviation as a function of number of collisions and discuss your results. 


4, What do you expect the effect of a non-zero puck size is on the shape of the 


speed distribution function? Investigate this effect by making several long 
runs with different puck diameters. 


REFERENCES/ A. Sommerfield, Thermodynamics and Statistical Mechanics (New York: 
INFORMATION Academic Press, Inc., 1964), p. 297. 
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The previous sections in this chapter have suggested new ways to explore the 

mathematics and mathematical models of physics with the programmable 

calculator. The calculator can also be a valuable aid in the study of basic 

astronomy, offering quick computation for graphing and iterative numerical 
(OsjecTIVE solutions. This section and the following section illustrate only a few of 

the wide range of applications for the programmable calculator in basic 

astronomy explorations. 


With the help of your calculator, the Equation of Time can easily be 
calculated to an accuracy of a few seconds. You can directly apply and 
calculate the two physical effects known to be responsible, i.e., the obliquity 
of the ecliptic and the eccentricity of the earth’s orbit. 


The equation of the sun’s orbit about the earth is 
ie A(1 +e cos [0 —9,]) 
; (1) 


where e is the eccentricity, A is a constant, and , is the sun’s longitude at 


Facts/ 
THEORY perihelion (see Figure 1). 


North Celestial Pole 


Ecliptic 


Celestial Equator 


Mean 
Sun 


Perihelion 


Figure 1. 
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The oribital angular momentum L is constant, so we have 
d®_ L __ LA? 


At one Lu [1+e cos (8 -9,)] [2] 
Neglecting the small e* term, then, 
x ta(1 + 2¢ 0s (8 -—8,)) [3] 


where w= LA’/m. «, represents the sun’s average angular velocity on the 
ecliptic. To solve this equation with adequate accuracy, we put O(t) =O, + wot 
into the right-hand side and integrate with respect to mean solar time t. 
Then we have 

O(t) =O, + wot + 2e sin wot [4] 
The time t is measured from the instant of perihelion passage. 


To find the Equation of Time, E(t), we find the sun’s true progress [$(t) ] 
along the celestial equator and compare it with the progress of the mean 
sun (Wot). 

E(t) = wt — $(t) [5] 
The instants of time at which E=0 are determined by requiring that if 
the eccentricity (e) is equal to zero, then E is also equal to zero at the 
equinoxes. To satisfy this choice, ¢(t) is set equal to the right ascension of the 
true sun plus 05. 

$(t) = 8, + a(t) [6] 


The right ascension @ is calculated by solving the spherical triangle shown in 
Figure 2. It’s easy to solve for a using the law of sines and the law of cosines 
for right spherical triangles: 

cos O(t) 
[1 —sin*e sin*O(t) ]!”* (7] 
where € is the obliquity of the ecliptic. 


cos a= 


True Sun 


Vernal 
Equinox a 


Figure 2. 
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The following program allows you to evaluate the Equation of Time for any 
year, given the astronomical constants @,, O,, e, and e for that epoch. Before 
running the program, be sure that the calculator is in the degree mode. 


Program Keystrokes Purpose/Comments 


OFF/ON [RN] Clears calculator and enters 
learn mode. 


Calculates (right 
ascension). 


THE 
PROGRAM 


Calculates ¢ (sun’s true 
progress along celestial 
equator) if 0<360. 


Calculates ¢ if 8<540, 


Stores t and begins 
calculation of ¢. Tests to see 
if 8< 360; if so, transfers to 


Stores w, Oo, (180 e)/7, and 
sin’e. 


Note: Print command may be omitted if the PC-100A is not used. 
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REGISTER Roo Ros ®o Riz @ 

ConTENTS Roa Ro; 9, Ris 8 
Roz Ros (180 e)/7 Ris Wot 
Ros Roo sine Rus $ 
Rox Rio Ris 
Rost Ri Qe’ Ra; 


Enter data (constants 
for epoch). 
Wo Wo 
0, 
(180 e)/7 


sin’ € 


Enter t (measured 

from the instant of 

perihelion passage) 

and calculate E(t). E(t)° Allow several 
seconds for 
calculation. 


Repeat this step as 
often as desired. 


°This value is printed if the PC-100A is used. 


The astronomical constants for the epoch 1980 are given below. Use this 
information to solve the Equation of Time from t=0 to t= 360, at intervals 
of 20 days. 


@) = 360°/365.2421982 days 


©, = 282.59646° 
e = 0.0167175° 
€ = 23.441883° 
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Enter program. 


Set decimal at six (2nd) HE 6 
places. 


Enter data. 


360 [=] 360.000000 
365.242 1982 365.2421982 w, 
Ee) 0.985647 


282.59646 282.596460 0, 


.0167175 
23.441883 


0.957842 (180 e)/7 
0.158260 sin’e 


Enter t and calculate 


E(t). 
t=0 — 4.368882 
t, =20 — 11.746792 
t= 40 — 14.207033 


Continue for all values 
of t. 
t1, =360 


— 4.368882 3.039227 6.456142 


— 11.746792 3.272447 12.854483 

— 14.207033 0.262027 16.223871 

— 11.796538 — 3.894666 14.591118 

— 6.421670 — 6.328610 7.750332 

— 0.675805 é — 5.151356 — 1.889634 
— 0.360710 
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Apparent Time — Mean Time (Minutes) 


1. Derive Equation [7] by solving the right spherical triangle of Figure 2. 


2. Investigate the effect of the values of 05, e, and e on the curve of E(t) vs. t. 


REFERENCES/ A clear but qualitative discussion of the Equation of Time is found in the 
InrormatTion following text: 


Stanley P. Wyatt, Principles of Astronomy, 3rd ed. (Boston: Allyn and Bacon, 
Inc., 1977), pp. 83-84. 


Pus oa Se EEE 
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Sundial Design 


The construction of a simple sundial makes an interesting special project for 
the general astronomy or practical astronomy course and helps to reinforce 
the basic facts about the positional relationship of the sun and earth. 


The handheld programmable calculator speeds up the computational aspects 
of the design and enables you to check out many possible configurations 
quickly, so that the best one can be selected. By entering the parameters 
describing your latitude and dial face orientation, you can then compute the 
angle between the edge of the gnomon shadow and the line in the dial plane 
which lies in the north-south vertical plane. 


The constructional aspects of sundial design will not be treated here. (For a 
practical approach to this subject, see Sundials: Their Theory and 
Construction by Albert E. Waugh.) We'll confine ourselves here to the 
calculation of the angles of the hour lines for a sundial whose indicator or 
gnomon edge is parallel to the rotation axis of the earth and which has a flat, 
though not necessarily level, dial face. With the program given here we can 
find the hour lines for sundials on vertical walls, sloping ground, or other 
surfaces, in addition to the ordinary horizontal sundial. 


If you want the sundial to indicate standard time rather than local solar time, 
you must incorporate a longitude correction. This is accomplished by 
applying a constant time shift based on the difference between the longitude 
at which standard time is set and the longitude of your location. Because this 
shift depends on location, we won’t consider this factor in our discussion, but 
it should be kept in mind. Also, sundial readings must be corrected for the 
Equation of Time (see the previous section) if more than 15-minute accuracy 
over the entire year is desired. Unfortunately, this correction is 
time-dependent and is difficult to incorporate into the design. A graph is 
often provided with the sundial to illustrate this compensation. 


For sundials in the Northern Hemisphere, the dial face orientation is 
specified in the following way. The dial, starting out level at latitude 4, is 
tipped along an east-west axis by angle i. (Angle i is positive if the south edge 
goes down; otherwise it’s negative.) The face is then rotated about a vertical 
axis by angle ¥, where yW is positive if the face rotates clockwise as seen from 
above. Thus, for example, a southeast-facing wall would be described by 
i=90° ~= —45° and a horizontal dial by i=0, Y)=0. The geometry of the 
situation is shown in Figure 1. On this diagram of the celestial sphere, P is 
the north celestial pole, Z is the observer's zenith, W is the west point, S is 
the south point, AWRS is along the horizon, WQ is the celestial equator, and 
AUVS is the intersection of the plane of the dial face with the celestial 
sphere. The hour angle is H. 
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Figure I. 


We want to find H’, the angle between the edge of the gnomon shadow and 
the line in the dial plane which lies in the north-south vertical plane. The 
value of H’ will depend on H, ¢, , andi. The solution is extremely 
complicated to carry out explicitly, but it can be done on the programmable 
calculator by just chaining together the numerical solutions of several 
spherical triangles. In the following outline let CA and CS denote the law of 
cosines for angles and sides, respectively, and let S denote the law of sines. 


In triangle QWR we have, by CA, 


cosa = sin (90°— $)cos(90°— H) (1) 
and then, by S, 
sin a= sin(90°— ¢)sin(90°— H) [2] 
sina 
and, by CS, 
cos f=cos a cos(90°— H) [3] 
Then in triangle ARV, by CA, 
cosy = —cos i cosB +sin i sinBcos(y + f) [4] 
where 8 = 180°—«. Also in this triangle, by S, 
sin b=sin i ee [5] 
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Now in triangle ASS’, by CA, 


cos 6 =sin i cos(90°+y) (6] 
and by S, 
sin c=sin i Ee sella 4 | (7) 
sin 


Finally, in triangle PVS’, we can find the desired side H’ by CS, 
cos H’ = cos(90°+ a + b)cos(180°— ¢ +c) 
+ sin(90°+ a +b) sin (180° +0+c) cos H (8] 


In the program given here, round-off inaccuracies can occasionally cause 

flashing displays for special values of y, i, H, or ¢ (0° or 90%). This problem 
can be avoided by slightly perturbing the entered values away from these 
special angles. 


Program Keystrokes Purpose/Comments 


OFF/ON [Ry] Clears calculator and enters 
learn mode. 


Stores ¢, i, and y, in that 
order. 


Stores 90° and 180°. (Note: 
Subtracting 1 x 10-" 
eliminates the round-off 
inaccuracy mentioned 
earlier.) 


Stores H and begins 
calculation of H’. For 
triangle QWR, calculates a, 
a, and f, 


BRARRHAR 
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Program Keystrokes Purpose /Comments 


For triangle ARV, 
calculates Y and b, and then 
sums b to a in register 6. 


an 
a8 
q 

® 


HHe 

Be 
| 
Sieh 
HB 


f 
a 
a4 


a 

a0 
~ x 
Oag 
28 


z 
Ey 
BU 
& ji 
| 


For triangle AS’S, calculates 
6 and c. 


Hl 
EB 


oT Ta: 
Brel: 
Was pl 


_ 


SPIE 
lH 


it 
_— 


[INV] 
[RCt] } 
(RCI) 
=) 
(RCL) 
ba 
DI 
[EE] 


els 
EH] 
a 
D> 


Calculates H’ (triangle 
PVS’). 


; 
i 


BERHHER 
gu 


REGISTER Ro ¢ Ry, @ Ri (90°+at+b) 
CONTENTS Roe 41 Ros a, at+b Ri, (180°-—¢+c) 
Ro Ww Ry =f Riz 
R,; 90° Ros 180° R,,; — sin(90°—@) 
Ros H Ros c Ri, (90°— H) 
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Procedure Display/Comments 


Enter data. 


: 


BB) 


i 
1.8 02 (180°—2x 10°") 


Fix decimal for desired 
accuracy. 


al 
a 


Enter H and calculate 
A: 


el 


H’° (Allow several 
seconds for 
calculation.) 


°This value is printed if the PC-100A is used. 


Given the parameters listed below, calculate H’ for H=0°, 15° 30%, 45°, 60°, 
75° and 90°. 


Latitude: o=40° 
r Inclination: i=90° (Vertical wall) ; 
AMPLE nee. b=909° act ; 
edncahs Rotation: W=20 (Facing slightly west of south) 


Enter program. 


Enter data. 


no 
gsss 


Feeeee! geee 


Set decimal for 6 


places. 
Enter first value of H 
and calculate H’. 


Repeat for each value 
of H. 


0.000115 (degrees) 
11.615194 
22.521310 
33.450367 
45.137156 
58.380070 
73.987005 


econo kek we SO 
— nS) i) 
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XPLORATIONS 


REFERENCES / 
INFORMATION 


SUNDIAL DESIGN 


1, Design the hour lines for a sundial at your own latitude and longitude. 


2. Design the hour lines for a series of dials mounted on three sides of a level 
cube aligned to the cardinal directions at your location. 

3. Given that the gnomon of a sundial is a flat, wedge-shaped piece attached 
to the dial face and lying in the North-South vertical plane, what is the 
angle of the wedge in terms of angles defined in Figure 1? 


(Answer: $ - c, where c is given by equations [6] and [7].) 


R. N. Mayall and M. L. W. Mayall, Sundials (Boston: Hale, Cushman and 
Flint, 1938). 


Albert E. Waugh, Sundials: Their Theory and Construction (New York: 
Dover Publishing Company, 1973). 
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Programmable Calculators... 


Place the power that used to be exclusively the domain of large 
computers right into the palm of your hand. At your desk, in class, in the 
lab, in the field — you now have instant access to an accurate, easy-to-use 
computational system. New dimensions in analysis, decision-making, and 
learning are opened up for you, with “on-line” power and in-hand 
convenience. 


Sourcebook for Programmable Calculators... 


Goes far beyond any owner's manual in exploring the applications of the 
programmable calculator in your field of study or profession. 
Step-by-step examples and programs give you an in-depth look at the way 
machines like the TI Programmable 58™ and the TI Programmable 59™ 
calculators can be applied as an integral part of classroom study or 
professional work. Fast, accurate calculation, rapid data tabulation and 
graphing, exploration of mathematical formulas and models, quick 
statistical analysis and projection — these are just part of what's possible 
with the programmable calculator. It can give you the edge you just 
can’t afford to be without in today’s fast-paced world. ~ yee 

4 


Check These Topics: 


@ Basic Number Theory @ Business/Operations Research 

M@ College Algebra/Trigonometry — ™@ Economics 

@ Calculus/Linear Algebra @ Biology 

@ Statistics @ Biomedical Engineering 

@ Music Theory @ Electrical/Systems Engineering 
@ Physics/ Astronomy 


If you already own a programmable calculatoreee 


This book can open up far more of its power for you with applications in 
areas you may never have even considered. 


If you don’t own oneeee 


This book shows you just how easy-to-use, powerful — and necessary — a 
programmable calculator can be as part of your studies or career. 
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